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Tato publixace popisuje programovact 
jazyk DE/RPG urceny ke zpracovani dat na 
zarizeni Consul 2715. DE/RPG je jazyk 
vysoke urovne, «tery dovoluje velmi jed~ 
noduse realizovat zejmena Ulohy porizo- 
vani, prezeouseni, prepoci tani, prohli- 
Zeni a opravovan) dat. Dalsi ulohy zpra~ 
covani dat {ddrzba datovych souboré dav- 
kovym zotsooem, tisk libovolnych vystup- 
nich sestav pod.) lze v jazyku DE/RFG 
take snacno realizavat (pomoci podmnozi- 
ny vypocetnicn prikazd jazyka RPG 111). 

Publikace je urcena orogramatordm ja- 
ko referenéni orirucka a popisuje jazyk 
DE/RPG do vsech detaild. Neni ucebnici 
ani navodem k programovani, vyzaduje 
alespon povSechnou znalost zakladi jazy- 
ka a programovami. 
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Navod k obsluze, 616.81! 
DE/RPG Programovani, 616.82 


DE/RPG Prirucka Programatora, 
616.822 
Komunikace, 616.819 


Prirucka systémoveho Programatora, 
616.813 
Ridici jazyk procedur, 616.823 


DE/RFG (Data Entry / Report Program Generator) je specialni aroaramovaci iazyk vysoke urovne 
zamereny na porizovani, kontrolu, predzpracovani i zpracovani dat hromadneho Charakteru, vcetne 
prenosu dat po telexomunikacni ince. Je urcen pro zarizeni Consul 2715, jehoz moznosti plné vyu- 
ziva. Z programovaciho jazyka RPG, znameho z jinych pocitacd, pouziva jen vypocetni cast - formu- 
lar C. V jazyku DE/RPG ze pouzivat prikazy, které tvori podmnozinu vypocetni casti jJazyka RPG III. 
DE/RPG-programy tedy neobsahuji tzv. zakladni programovy cyklus, jak je znam z jazyka RPG. Zato 
obsahuje programavy cyklus v casti DE (Data Entry), realizovany orostrednictvim formulare Z. Vstup- 
ni a vystupni data (vcetne nékterych vypocetnich operaci mensiho rozsahu) se Popisu)i na formula- 
Fi A (na rozcil od jazyxa RPG, kde se popisuji na formularich F, 1, 0). 

Mimoradny déraz je kladen na porizovani a xontrolu prvotnicn dat z dokladd. Proto je vytvareni 
tohoto druhu program’ co nejvice zjiednodugeno. Uloham tohota typu budeme fikat kratceji ulohy pori- 
zovani dat. 

Tato prirucka sopisuje vsechny mozné zapisy, které mohou byt pouzity v jednotlivych prikazech, 
Nesnazi se o oopis konxretaich aplikaci, ani o doporuéeni urcitych Programovacich technik. Jsou 
vy mi detailné popsany prikazy a operacni viastnosti Programovaciho jazyka DE/RPG. Prirucka poskytuje 
}ak uvodni, tak podrobne referencni ddaje ootrebne k programovani, se zvlastnim zretelem k porizo- 
vani a predzpracovani dat. Ctenar by mél byt obeznamen se zakiady jJazyka DE/RPG a se zakladnimi 
zplisoay jeho pouziti. 

Kapitola 1 je obecnym popisem jazyka DE/RPG. Popisuje zdrojovée orikazy, ofekladac a prelozeny 
(vykonny) program. Uvadi taxé rézne programovaci strategie a jednoduchy priklad na pofizovani dat. 

Kapitola 2 popisuje organizaci prikazd ve zdrojovem orogramu. Obbsahuje take informaci o sys- 
temovem programu SYSSEP, ktery usnadnuje porizovani a udrzbu zdrojovych programi. 

Kapitola J informuje o tom, jax zaoisovat zdrojové prikazy v jazyku DE/RPG. 

Kapitola 4 vysvétluje, jak zapisovat prikazy do formilare Z. Vyklad je usporadin podie typu 
prikazi a vSechny zapisy jsou podrabné papsany. 

Kapitola 5 vysvétluje, jak zapisovat prikazy do formulare A. Vyklad je usporadan podle typu 
prikazé a vsechny zapisy isou podrabné popsany. 

Kapitola 6 vysvetluje, jak zapisovat prikazy do formulare C. Vyklad je usporadan podle funké- 
nich skupin prikazG a vSechny zapisy jsou podrabné popsany. 

Kapitola 7 obsahuie tivodni i detaiini informace o tabulkach vytvarenych béhem prekladu (pri- 
kompilované tabulky) ao algoritmu samokontroly. 

Kapitola & obsahuje udaje o orekladaci jazyka DE/RPG vcetné Udajd o datavych souborech po- 
trebnych pro ofeklad a o volitelnycn rezimech prekiadu. 

Kapitola 9 popisuje operacni viastnost: prelozeneno (vykonného) programu: zahajeni, prdbeh 
a ukonceni vypoctu, vypocetni rezimy, klavesové funkce a idaje na stavovem fadhu. Popisuje take 
produxcni statistiky, ktere mize provacet vykonny program. 

Kapitola 10 popisuje zdnovy a zhusteny tvar dekadickych Cisel a tvar binarnich Cisel. 

Kapitola 11 obsahuje informace o podprogramech psanych v jazyku BAL pro ty programaiory, kte- 
fi chte@ji naprocramovat funkce, ktere DE/RPG neposkytuje. 

Kapitola 12 popisuje organizaci disketovych souboré a zpisoby pristupu k zaznamim. 

Kapitola 13 popisuje pouziti tiskarny v DE/RPG. 

Priloha i obsahuje kodovou tabulku DKOI. 

Priloha 2 obsahuje kédovou tabulku KOI-8 a prekadovaci tabulku. 

Priloha 3 ukazuje obrazovkové formaty systémového programu SYSSEP pro porizovani 
Drogrami v jazyku DE/RPG. 

Priloha 4 obsanuje vzory programovacich formularé Z, Aa C. 

Priloha 5 je seznam chybovych zprav, které hlasi preklada¢ jazyka DE/RPG pri prekladu. 
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Priloha S. Chybové zpravy prekladace DE/RPG . 1. eee ae ee eves a) eels wishes) fe POs 


Text 
Tisk 
Ukazatel doig 
Ukazatel nahoru 
Upozornéni . , 
Vlozeni zaznamu 
Vlozeni znaku ...,.. 
WherStoraitiC sce of tt St 
Tne. . 
Znak krok Cae Terror 

Znak zpéet , . fA weh a 
Zobrazeni kontrolovaného zaznamy ; Sad 
Zrugeni zaznamu . a 
Zruseni znaku . , 


Rejstfik. 2... ae ee ea ee ene el, Se Pe Te ae 2 ae, 
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Qbsah xi 
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Tato stranka je prazdna timysiné 


{ 1, VSeobecne o jazyku DE/RPG } 


| 


1.1 Programovani_v_jazyku_DE/RPG 


Programovaci jazyk DE/RPG se sklada ze soustavy prikazd zvanych téz zdrojové prikazy, a z pra- 
videl, ktera plati pro jejich zapis. PFikazy sestavené podle pozadavki lohy a podle pravidel 
jazyka DE/RPG tvori zdrojovy program, Zdrojovy program je vstupem do prekladace (kompilatoru), 
ktery z néj vytvori prelozeny neboli vykonny program. Zdrojové i vykonné programy jsou ulozeny na 
disketach jako datové soubory. Vykonny program se zavadi do paméti v okamziku, kdy je treba 
naprogramovanou ulohu realizovat. 


1.1.1 Zdrojové_prikazy 


Zdrojové prikazy jazyka DE/RPG se déli na nékolik typi: 
~ Specifikace Wlohy. Uloze se dava jméno a zadavaji se jisté jeji charakteristiky. 
-Vstupni format. Zadava se pofadi, v némz se zobrazuji vstupni obrazovkove formaty (pouze pro 
Ulohy porizovani dat) nebo poradi, v némz se provad@ji podprogramy behem zpracovani Ulohy. 
- Prohlizeci format. Na zdkladé obsahu disketového zaznamu se ur€uje obrazovkovy format pro rezimy 
prezkouSeni, zména nebo prepotet. Plati pouze pro Ulohy porizovani dat. 
~Popis souboru. Datovému souboru se dava jméno, popisuji se jeho charakteristiky a pridéluje se 
tu vstupni/vystupni zarizeni (V/V-zarizeni). 
~ Popis zaznamu. Zaznamu se dava jméno a popisuji se jeho vlastnosti. 
~ Popis pole. Popisuji se charakteristiky datového pole a jeho umisténi v zaznamu. 
~ Popis tabulky. Identifikuje se datova tabulka pouzita v programu. 
- Konstanta. Specifikuje se pevny, neménny udaj v zaznamu. 
~ Wypotetni prikaz. Specifikuje se prikaz k provedeni urcité vypotetni operace tvorici s ostatnimi 
operacem: podprogram. 
~ Komentar. Slouzi k zapisu komentar a vysvétlivek k programu. Nepreklada se do vykonného programu. 
Soucasti zdrojového programu mohou byt i daléi typy prikazd: 
~ Definice prikompilovanych tabulek (vytvarenych behem prekladu). 
~ Specifikace algoritmu samokontroly. 


1.1.2 Zdrojovy_program 


___PFikazy popisujici Glohu se souhrnné fazyvaji zdrojovy program, Zdrojovy program musi byt pred 
prekladem zapsan na disketovy soubor. K tomu slouzi program SYSSEP (system source entry program), 
Popsany v kap. 2, 

Prekladac pri prekladu cte a vyhodnocuje zdrojovy program, pridéluje datové oblasti soubordm, 
zaznamim a polim a vytvari vykonny Program, ktery zahrnuje funkce specifikované ve zdrojovém prog- 
ram. 


1.13 Progranay 


DE/RPG dovoluje zvolit k realizaci urcité aplikace jednu ze tFi zékladnich strategii: 
~ Pouziti transakéniho souboru. 
~ Pouziti transakéniho souboru a vypotetnich prikazi k doplikovému Fizeni vstupnich/vystupnich ope- 
raci na jinych souborech. 
Pouziti vypocetnich prikazi k Fizeni celého programa. 


Transakénim souborem nazyvame datovy soubor na disketé, ktery vznika pri porazo- 
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ani tery se prezkuSuje a opravuje tak, aby data byla co nejspravnejsi a pohla byt pouzita 
Net oy ttransakéni) aiker Ba davkovén zpracovani Gloh na stfediskovem pocitati, q 
Vsechny operace, rutiny a podprogramy nutné k praci s transakcnim souborem ytvari prekladat 
DE/RPG automaticky. K ovladani transaktniho souboru nelze pouzit dodatetnych vypocetnich prikazd, 
Program pracujici s transakcnim souborem mize byt pouzit v rdznych rezimech: vstup novych dat, pre- 
prezkouSeni existujicich dat, oprava (zména) existujicich dat, prepotet existujicich dat. 


Nepouziva se transakéni soubor, vSechny operace s datovymi soubory musi 


p 
by’ prikazy. 


1,2 Charakteristika dloh pouzivajicich transakéni soubor 


lohy, které pouzivaji transakéni soubor, jsou obyfejné uilohy porizovani dat, tj. tilohy, 
v nichz operator vkladd data z prvotnich dokladd prostrednictvim klavesnice do stroje a vytvari 
tak disketovy soubor. 


Zaznamy transakéniho disketového souboru 1ze prezkouSet, opravovat (aktualizovat) a prepotitat 
timtéz programem, ktery byl pouzit k jejich porizeni. 


1.2.2 Klav 


V ilohach pouzivajich transakéni soubor mize byt pouzit bohaty repertoar klavesovych funkci. 
Tyto funkce usnadfuji a zkvalitiuji vkladani dat, umoZfuji vyhledat urcity zdznam podle poradového 
isla nebo podle obsahu, kopirovat zaznamy z jiného disketového souboru a pripojovat je k transakt- 
nimu souboru, a vkladat zaznamy dovnitf transaktniho souboru aj. Podrobné informace o klavesovych 
funkcich a operacnich rezimech programd jsou uvedeny v kap. 9. 


V Glohach pouzivajicich transakéni soubor se shromazduji statistické Gdaje o Cinnosti operdto- 
ra. Jsou vedeny ve specidlnich stfadacich, a to za jednotlivou tilohu nebo za celé pracovisté. Dal- 
Si informace o statistikach jsou uvedeny v kap. 9. 


1.3 Programovani min i ilohy 5 transakénim souborem 


_, Jednoducha tloha poFizeni dat vyZaduje jen nékolik prikazi ve zdrojovém programu. Jestlize se 
porizuji zaznamy jednoho typu, stati zapsat tyto prikazy: 


~ Specifikace Wlohy (zadani charakteristik Wlohy). 

- Vstupni format (odkaz na popis porizovaného zaznamu). 

~ Popis souboru (klavesnice/obrazovka). 

~ Popis zaznamu (pojmenovani a popis zaznamu, k némuz patri datova pole). 
~ Popisy poli (popis charakteristik datovych poli). 
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= Popis souboru (transakéni soubor na disketé). 


Obrazek 1.1 ukazuje priklad zapsanych prikazi pro jednoduchou lohu porizeni dat. Prvotni do- 
klad pro data v této dloze je stranka z méstského telefonniho seznamu. Zapisy v seznamu jsou (zle- 
va doprava) jméno, adresa a telefonni Cislo. V Uloze se poZaduje pouze jméno a telefonni tislo; 
adresa se vynechava. Kazdy prikaz obsahuje minimdlni pocet zapisd. 

Volby 
Podminky —eennewe, 
loha: 
DalSi format CFILE EXITATR SHARE 
(0-9, A0-29) DATE —JOBOPT = SHARER 
EDITC PRTFILE STATUS 
ENTRATR SFILE TFILE 


Testovaci znak 


Forsu- Opakovani 
lar (1-9,N) Felae | 
= ao | 
J| E] | Testov. Vstupni format: 
5 CLRL SLNO 


EOJ WRITE 


INSERT RESET SUB konstanta 


CK(AD AS BC BV BY DD DR FE Gxx + 
LC ME MF Mixx RB RL RZ) 


be a 
01234567890 


| 


Nasledujici odstavce vysvétluji jednotlivé prikazy a zapisy z obr. 1.1. 


1.3.1 Formula? Z 


Piikaz pro specifikaci dlohy. Na prvnim rédku formuléfe Z je zapsin prikaz pro specifikaci tlohy. 
Prekladat VyZaduje zapis pismena Z ve sloupci 6 a pismena J ve sloupci 7. Jméno wlohy je A, coz 
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je strutné, ale dostacujici. Uloha ma pouzivat transakéni soubor, coz je naznateno klicovym sloven 
TFILE. Jmeéno transak¢niho souboru je C. 


disketu zapisi ve tvaru standardniho zaznamu. zaz k v v : 
umisténych za sebou v pofadi vstupu od zacatku do konce.) Zapisy, které mohou byt pouzity v jednot- 
livych typech prikazi, jsou popsany v kap. 4 az 6. 


1.3.2 Formula? A 

Prikaz pro popis souboru_na_kla A : 
prikaz pro popis souboru na klavesnici/obrazovce. Pismeno A ve sloupci 6 a pismeno F ve sloupci 17 
urcuji typ prikazu pro prekladac. Pismeno D ve sloupci 19 je jnéno souboru. Délka zaznamu je 37 
pozic; lidaj je zapsan v pravem okraji rubriky “Délka”. Klicové slovo DEVICE _(zarizeni) s paramet- 
rem CRT (cathode ray tube - katodova paprskova trubice) pridéluje souboru zarizeni klavesnice/ob- 
razovka. Protoze neni pouzito klicové slovo DSPSIZ, je rozmér pouzitelné Casti obrazovky standardni 
hodnota 480 znakovych pozic (4 radki po 80 sloupcich). 


Mici/obrazovce. Druhy prikaz na formulari A je prikaz pro popis 

smeno R ve sloupci 17 urcuji typ prikazu pro prekladac. Jmeno 

zaznamu (B ve sloupci 19) je stejné jako jméno v prikazu pro vstupni format. Pismeno I ve sloupci 

38 definuje standardni hodnotu (vstupni pole) pro prazdnou rubriku “Uziti" v nasledujicich prika- 
zech pro popis poli. 


Péikazy_pro_popis_poli_na klavesnici/obrazovce. Ve dvou nasledujicich fédcich formulate A jsou za- 
Psany prikazy pro popis poli. Typ prikazi je urcen pismenem A ve sloupci 6 a zdpisy délek (30 a 7) 
vrubrice "Délka". Zadné z obou poli neni pajmenovano, protoze ani jedno, ani druhé neni pouzito 
ve vypottech a protoze zaznam se na disketu zapisuje ve standardnim tvaru (bez transformace). Prv- 
Mi popsané pole je dlouhé 30 pozic, jak je udano v rubrice "Délka™ (sloupce 30 az 34). Je urceno 
pro znakova {abecedné Cislicova) data, protoze rubrika “Desetinna mista” (sloupec 37) je prazdna. 
Druhe pole je dlouhé 7 pozic; je uréeno pro Ciselnd (numericka) data bez desetinnych mist, protoze 
v rubrice "Desetinnd mista" je zapsana Cislice 0. 

Obé pole jsou vstupni, protoze v prikazu Pro popis zaznamu (v rubrice "UZiti") bylo zapsano 
pismeno I, ktere uréuje standardni vyznam prazdnych ddaji "UZiti* (sloupec 38) v prikazech pro po- 
pis poli. Prazdné daje v rubrice "lyp dat" (sloupec 35) Znamenaji urcité standardni nastaveni 
(premyk) klavesnice behem vkladani dat. Pryni pole je popsdno jako znakové, standardni premyk kla- 
vesnice je tedy abecedni. Druhé pole je Eiselné, standardni premyk je u néj tedy ciselny. Vynecha- 
ne zapisy v rubrikéch "Radek" a "Pozice" (sloupce 37 az 44) a nepouzité kligové slovo SLNO (cislo 
potatecniho Fadku) zpisobi zobrazeni pryniho Udaje od pozice 1 Fadku 3. 

. _,Obsah_prvniho pole se zobrazi v pozicich 1 ad 30, obsah druhého pole se zobrazi v pozicich 1 
az 37 (tésneé za prvnim polem). 


Prikaz_ pro popis_transakiniho souboru. Posledni 


Be Fikaz zdrojového pr. é 
transakcniho souboru. Tento soubor ma jméno C, i : POU Sere PCr Lae ds akel Ove 


ou shodné se jménem zadanym jako parametr klitoveho 
slova TFILE v prikazu pro specifikaci ilohy. Délka kazdého zdznamu je 7 a Povinné klicové 
slovo DEVICE pridéluje souboru zarizeni, které musi byt pro transakini soubor vidy disketové 


(DISK). Protoze neni zadino klitové slovo BLKING i za isketé i 
Pres AEE tS acct ere ptowal » bude seskupeni zaznami na disketé standardni, 
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1.3.3 Jak rozsirit zdrojovy_ program 


Program z obr. 1.1, popsany v predchazejich odstavcich, mize byt snadno rozdiren tak, aby 
poFizované zaznapy pred zapisem na disketu transformoval. Obsah poli se pri transformaci nezméni, 
meni se vSak jejich poradi v zaznamu. 

V prcdchazejicim prikladu je ve vysledném zaznamu umisténo jméno telefonniho uéastnika jako 
pryni a telefonni cislo jako druhé; poradi je dano pofadim prikazd pro popis poli ve formulati A. 
Chcene-li vysledné poradi zménit, nemusime ménit poradi popisi poli pro klavesnici/obrazovku, ale 
stati doplnit nékteré zépisy a prikazy podle obr. 1.2. Doplnéné kody jsou v obrazku zvyraznény. Na- 
sleduje vysvétleni jednotlivych doplaki. 


ee onan 
Format | 
(1-9,A0-Z9) 


Podminky | is eae saint 
Rezim 
peewee anennennwnnan! Dalsi format CFILE EXITATR SHARE 
Testovaci znak (0-9,A0-29) DATE  JOBOPT SHARER 
Opakovani ney EDITC PRIFILE STATUS 
(1-9,N) Relace ENTRATR SFILE TFILE 


E scien! | Vstupni format: 


pozice CLRL SLNO 
EOS WRITE 


Pozice 
Desetinnal] ADD -DSPATR LOOK SEQ 
nista | | ARRATR EDTCDE PNT  SETOF TADD | 
AUXDUP ERROR RANGE SETON TSUB | 
AUXST EXSR  RANGET SHIFT XCHK 
COMP INSERT RESET SUB konstantal 
Ra-{51. 
call CHECK(AD AS BC BV BY DD DR FE Gxx +] 
LC ME MF Mxx RB RL RZ) | 
| 


DEVICE (CRT) 


| 
| 
| 
| 
| 


Do prikazu pro vstupni format bylo pridéno kliové slovo WRITE (zapsat) s parametrem H (jmé- 
no zaznamu transakéniho souboru). Zaznam transakéniho souboru bude obsahovat stejnd datova pole 
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jako standardni zaznam, ale v_opacnem poradi: we Fikinel r . 
K popisiim poli (treti a ctvrty fadek formulare A) byla pridana jmena (k al), a to proto, aby 
bylo mozné pozdéji se na pole odvolat. Poradi prikazi pro popis poli zistava beze zmeny, takze data 
se zobrazuji stale na stejnych mistech obrazovky, 
Ke zdrojovemu programu byly pridany tri nove prik 
vaného zaznamu H transakéniho souboru. Prvngeprikaz d a e 
poradi datovych poli v zaznamu. Pole zde nemusi byt znovu Uplné popsana; 

fu popsdna jednou (v tomto pripadé v obrazovkovem zaznamu) . 
V transformovaném zaznamu zaujima prvni vkladané pole, coz je jméno telefonniho ucastnika, 


pozice 8 az 37. Druhe vkladané pole - telefonni cislo - zaujima pozice 1 az 7. 


azy, popisujici slozeni (format) transformo- 
ava zaznamu jméno H. Dva dalSi prikazy urcuji 
staci, kdyz jsou v progra- 


1.3.4 Spusténi_programu 


Poté, co je program prelozen, mize operator zavest vysledny vykonny program do programoveho 
oddilu. Po zavedeni programu je operator vyzvan, aby zvolil pocdtetni rezim vypoctu. Dale je vy- 
zvan, aby zadal skutecné jméno souboru a identifikatni kod zarizeni, na némz je tento disketovy 
soubor umistén. Chce-li operator ukoncit praci, musi pouzit klavesovou funkci "konec prace". 
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(2. Soubor se zdrojovym programem 


2,1 Prikazy jazyka DE/RPG 


Disketovy soubor s prikazy zdrojoveho pr; ri Fekladac 
iske ‘ogramu tvori vstup do prekladace jazyka DE/RPG. P. 
to musi zaznany tohoto souboru  obsahovat didaje ve spravném tvaru. Tvar prikazd je predepsan Fabris 
kami v programovacich formularich. Kazdy fadek programovaciho formulafe obsahuje 80 sloupcd, které 
primo odpovida} { 80 pozicim v zaznamech pozadovanych prekladacem. ee 
eee 2.1 ukazuje tri druhy formulard, které se pouzivaji pro zépis zdrojového programu. For- 
mular Zi A se deli na dve casti. V levé Casti je vyznam zdpisd urcen umisténim do rubrik, kdezto 
v prave Casti je urcen klicovymi slovy zapsanymi ve volném tvaru. Ve formulari C je yan Sech 
zapisi uréen umisténim do rubrik. et Bs 
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Format 
(1-9, 0-79) 


PoFa- 
di 


| Indikdtor 
poe ERROR) 


panennnnnepny 
el | 
| rormel 

la? 


Podminky 
Reiim 
ers Dalsi format CFILE EXITATR SHARE 
Jnenenownenny Testovaci znak (0-9, A0-Z9) DATE JOBOPT SHARER 
Qpakovana eam eneennn enn EDITC PRIFILE STATUS 
ae N) Relace ENTRATR SFILE FILE 


Sates peeenenmpony ’ 
Testov. | ] Vstupni format: 
Jueno E Al pozice EQ{'z' CLRL SLNO 
#P0Snnnn EOJ WRITE 
staat aa za Ganioae fe 


ers a) | 
oa. | funkce 
Uziti 

4 |Pozice | 

| {a DSPATR LOOK SEQ SUBST 

ARRATR EDTCDE PMT © SETOF TADD | 
souboru/| pai | }---y---{ AUXDUP ERROR RANGE SETON TSUB 
zaznanu/ oe dat hk | AUXST EXSR  RANGET SHIFT XCHK 
Ra- 


pole/ COMP INSERT RESET SUB konstanta 


tabulky Si. 


| esa WIdek| CHECK(AD AS BC BV BY DD DR FE Gxx +] 
| LC ME MF Mixx RB RL RZ) 


Obr. 2.1 (1/2) 
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a eo eon 


| heal | 
Fodminky | | | } - Vysled. | 
| | . indik 
mee qenezennd Cpe- 
| operand Jrace 


Obrazek 2.1 (2/2) 


2.2 2 Poradi prik 


Prikazy zdrojoveho programu musi byt serazeny tak, aby je prekladac mohl zpracovat. Zpracova- 
va je postupné, pocinaje prvnim prikazem. Komentarove prikazy nezpracovava; ty mohou byt umistény 
kdekoliv. 

Nasledujici schema vyjadruje puradi zdrojovych prikazi. 


Vstupni a prohlizeci format 
Popis souboru, zaznanu, pole, tabulky, konstanty 
Popis vypoctd 


r 
Porac F 
Specifikace Ulohy 


Prvnim prikazem Zpracovanym prekladacem musi byt specifikace Wlohy. Kazdy zdrojovy program musi 
Gbsahovat pravé jeden takovy prikaz. 

Zbyvajici prik azy na formula?i Z musi nasledovat za prikazem pro specifikaci Ulohy. Kazdy 
2dtojovy program musi obsahovat alespon jeden prikaz pro vstupni format. Prohlizeci formaty, 
3300-11 pouzity, mohou byt uvedeny p*ed prikazy pro vstupni format nebo za nimi, protoze je prekla- 

Zpracovava ocvélene od vstupnich format. Frohlizeci formaty se vSah provadeji v poradi, v nemz 
J3cu zapsan; 


Soubor se zdrojovym pragramem 


Prikazy na formulari A musi ve zdrojovém programu nasledovat za vsemi prikazy formulare Te Mur 
si byt zapsany v poradi podle hierarchického schématu, v n@mz popis souboru je na prynim miste: 


Prikaz pro popis souboru 
/ \ 
/ \ 
Prikaz pro popis zaznamu Prikaz pro popis tabulky 
/ 
/ 
Prikaz pro popis pole nebo konstanty 


Prikazy pro popis poli a konstant jsou vzdy podrizeny prikazu pro popis zaznamu. Prikazy pro 
popis zaznami a tabuJek jsou vidy podrizeny prikazu pro popis souboru. 

Prvnim zpracovavanym prikazem formulafe A musi byt prikaz pro popis souboru. Obecné je prikaz 
Pro popis souboru nasledovan prikazem pro popis zaznamu, ktery je jest@ nasledovan prikazy pro 
popis poli, popr. konstant. Jestlize soubor obsahuje neéholik typi zaznami, zapiSe se postupne dalsi 
prikaz pro pops zéznamu a za nim prikazy pro popis poli nebo konstant atd., dokud nejsou popsany 
vSechny typy zaznami v souboru. 

Jestiize ,2 v programy pouzito nékolik soubord, nezalezi na poradi jejich popisi. Prikazy pro 
popis soubor’ modou byt nékdy zapsany i hez podrizenych prikazd. Napriklad, je-li v prikazu pro 
specifikaci Clohy pouzito klicové slovo CFILE, urcuje samotny prikaz pro popis souboru disketove 
zarizeni, v néwz je ulozen kopirovany soubor. 


_, Prikazy na formulati C (jsou-li vibec pouzity) musi nasledovat za poslednim prikazem na for- 
mulari A. Poradi téchto prikazi (zvanych téz vypotetni prikazy) je uréeno potrebami programu, ale 
vSechny musi byt umistany mezi prikazem pro zacdtek podprogramu <BEGSR) a prikazem pro konec pod- 
programu (ENDSR). 


2.2. d eni_na_rubriky 

r Jestlize jsou pouzity prikompilovane tabulky nebo algoritmy samokontroly, musi prikazy s je- 
jich definicemi nasledovat az za poslednim prikazem formuldre C (je-1i ovsem pouzit). Tyto prikazy 
mohou byt 2apisovany na vSeobecny programovaci nebo datovy forqular (ktery neni élenén na rubriky), 
ale nesméji presahovat pres 80. pozici na Fadku. 


2.3, Beogiaaisl gran 


K porizeni 2drojového programu je mozné 5 vyhodou pouzit systémavého Programu SYSSEP (system 
source entry Program). Tehoz programu lze pouzit k opravé nebo prezkougeni existujicich zdrojovych 
prikazt. Program SYSSEP poskytuje 17 rdznych Obrazovkovych format véetné hlavni nabidky. Kazdy 
format je navrzen tak, aby usnadni ] Zapis urcitého typu prikazu nebo jeho pokratovaciho radku. 
Mand ratio useadnuje volbu réznych formaté podle jejich identifikacnich kod, 

rogram SYSSEP je napsin v jazyku DE/RPC. Soubor, na néjz se por jovy 

P . Je, . }Z S€ porizuje zdrojov rogram, je de- 
finovan jako transakeni soubor. Proto jsou v programu SYSSEP platne hat tea ranieie pri 
praci s transakénim souborem. Tyto rezimy jsou Popsany v kap. 9 

Program SYSSEP vyZaduje minimalné 13K slabik paméti. Rove Febné pamé % 2 

BLESS e m pameti. Rozsah potrebné paméti se zvySuje s dél- 
kou sektoru vystupni diskety. Je-Li velikost sektoru 1024 slabik, je potreba pamat 16 K Uiabik, Vet- 
si pamet je take nutna, pouziva-li se Klavesovych funkci "tisk" nebo "prohlizeni druhého souboru". 


2-4 DE/RPG - Popis jazyka 


2.4 Formaty program SYSSEP 


Kazdy format je urcen pro jeden typ prikazu a zobrazuje pouze ty zapisy (rubriky), ktere plati 
v tomto typu prikazu. Napriklad nasledujici format dovoluje zapsat jen udaje platne v popisu sou- 


boru. 


fo 0019 A 08 4 
AF POPIS SOUBORU 
~Jméno souboru: [19-26] Délka: [30-24] Uzitis (38) 
DalSi funkce: [45-80] 
| BLKING() CHECK(DD) DEVICE() DSPATR() DSPSIZ() FORM() INDEX() LABEL() 
| LOGON() MARK() NUMENT() VMARK() 


lenmmennnnne: 
Obr. 2.2 


Pravé zpracovavané pole formatu je zobrazeno inverzné. Do pole lze vlozit Udaj nebo je lze 
preskocit ci vymazat. Pri vkladani se obsah pole pretransformuje do spravného tvaru pro prekladac. 
Udaje, ktere musi byt zarovnany vpravo, zarovnava program SYSSEP. Program SYSSEP také doplnuje kon- 
stanty, ktere jsou u daného typu zaznamu povinne. Napriklad u pi'ikazu pro specifikaci Ulohy se 
automaticky dosadi Z co sloupce 6 a J do sloupce 7. 

Potée, co by} zaznam vlozen, zobrazi program SYSSEP automaticky dal5i vhodny format, je-li pri- 
Sti format predvidatelny. Napriklad prikaz pro specifixaci Glohy je nasledovan prikazem pro vstup- 
ai format a prikaz pro popis zaznamu je nasledovan prikazem pro papis pole. 

Nasiedujici schema uxazuje identifixacni kGdy jednotlivych formdti a be kazdému z mich take 
:den' ktery je automaticky vybran po pouziti klavesové funkce "“vstup" a “dal- 


fe 
j Identifikatni hod ] Po funkci | Po funkci 

a nazev formatu | “vstup” "dalSi format” 
Hlavni nabidka | 
Specifikace Glohy | 
Vstupni format | 
Pokracovani voleb 
Prohlizeci format | 
Popis souboru 
Pokracovani popisu souboru 
Popis zaznamu | 
Pokracovani popisu zaznamu | 
Popis pole (a konstanty) 
Pokra€ovani popisu pole (a konstanty) | 

| 


Qrr gars 


oO4oe 
o 


S 


Komentar 

Vypocet 

Format 0 (prikompilovana data) 
Popis tabulky 

Vstup malych pismen 

Komentar k prohlizecimu formatu 


Beacwe 


Prikaz pro konstantu se vytvari formatem 7 (popis pole) a formatem C? (pokracovani popisu 
pole). Prikazy pro prikompilované tabulky a pro specifikaci samckontroly se vytvare)i formatem 0. 
. Bez ohledu na preduréenou naslednost formaté je kdykolix mozné vybrat kterykoliv format véet- 
ne hlavni nabidky, a to pouzitim klavesové funkce "vybér formatu". 

Obrazoviove formaty odpovidajici yednotlivym identifikacnim kodim jsou uvedeny v priloze 3. 


Soubor se zdrojovym programem 2-5 


2.5 Pouziti progr: 


Program SYSSEP zavede operator do paméti tak, ze do disketové jednotky vsune disketu obsahu- 


jici tento program a odpovi na standarani vyzvu k zavedeni programu. Jmého programu je SYSSEP. 


0 0009 A 16 40 
| 
{ Jméno program: 

Adresa jednothy: 

Cislo oddilu: 


Fa 
| 


| C2715 Sxx.xxx Stiskni VSTUP 05-00 | 


ee ceenewsncncntenceeesanenenensnenenenenenensaenacnnsnnencnenansnannennnannnennnmnd 


Obr. 2.3 


Je-li program zaveden, vyzve operdtora k volbé pocatecniho rezimu porizovani dat. 


eee ennncecesenneenesenennneenasaeecnesnsenrenenesecansnnensaneassnenenny 


DOL 40 


Moznosti }sou: 
1. Vstup - PREPIS 3. Kantrola 
2. Iména 4, Vstup - ROZSIRENT 


Zvol moznost: Stiskni VSTUP 06-81 


! 
| 
Zvol rezim prace. | 
| 


5. Prepocet 


Obr. 2.4 


Volba 1 znamend, Ze chceme vytvaret navy zdrojovy program: bud zapisovat do prazdneho datovele 
souboru, nebo prepisavat zdrojovy program, ktery v datovem souboru jiz existuje. Pri vytvareni no- 
veho orogramu se ztrati vSechay doposud existujici zaznamy. 

Volba 2 znamend, Ze chceme prohlizet a ménit dosud existujici zaznamy. 

Volba 3 znamena, Ze chceme prezkouSet a poor. opravovat existujici zaznamy. 

Volba 4 znamend, Ze chceme pridavat nove zaznamy za konec dosud porizenych zdrojovych prikazi. 

Volba 5 znamerd, Ze chceme arohlizet zarojovy program v rezimu orepocet se zobrazenim, (Tato 
volba se ohyceiné ori porizovani zdrojovycn program) nepouziva.) 

Po voldé potateériho rezim: orogram SYSSEP vyzve operatora x zadani Udaji o souboru, na nen 
ma byt umistén porizovany zdrojovy orogram. Tomuto souboru fikame zdrojovy soubor. 


wewennennnennn nn nanannnnnnnenennnnennn nnn ennnn nen nenneneennnneeneneaeanenneennanny 
fo 9001 A 26 E2 E 

Uréi datovy soubor. 

Jméno souboru:  SYSIN 

Adresa jednotky: 4000 


Stiskni VSTUP 06-82 | 


ef 


| 


Obr. 2.5 


Operator se oesvédci, Ze disketa se zdrojovym souborew je zalozena a pripravena v zafizeni) 
a odpovi na vyzvu (jménem souboru a adresou zarizeni). 

_Jestlize operator zvolil a pedchozim obrazovkovém formatu (06-81) rezim 1 (novy program ne 
bo prepis) a jestlize soubor zadany ve formatu 06-82 neexistuje, vyzada si program SYSSEP dalii 
informace nutné k alokaci souboru (vyhrazeni mista pro soubor a vytvoreni navésti souboru). Je-li 
disketa chranéna heslem, zepta se na heslo. 


2-6 DE/RPG - Poois jazyka 


Poznamka: Delka zaznamd ve zdrojovem soudoru musi yt 80, protoze prikazy jazyxa DE/RPG \sou 
dlouhé 80 pozic. L : 

Jestiize operator zvolil rezim vstuo {2 nebo 4), zodrazi se hlavni nadidka uxazujici prehled 
formatd pro rizné tyoy zérojovych prikazi. 


eee ene wenn nanan nncenacennemnnenenaernnnneecnnanennennseeeemnenn eta mnnn enema, 


f a 
{ 0 0001 NO: 40 00000: es 


HLAVNI_NABIDKA: _ 

{ fiavni nabidka souceru 
2.Speciiirace Glohy é.Fovis zazname 
3.Vstuon: format 7.Foms pole O,Format 3 \o2"3z zaznamu) 
4.Pranlizeci forma: T.Poois tazley S.Dolni premy* (59) | 


{ 
| 
| 
{ 
Linen emeen enn ennenmeenencnnatnenenenennameemeennnanemenenenenecneenanancennnen een! 


8.Pozramia 
9.Vypocty 


Gor. 2.6 


Sperator mize zvolit forma: 2odle nazid‘y, mebo pouzit “lavesovou func) “vybeér formatu". Jest- 
lize 9071zL}3e 7ovy zcrojovy program, mel by zvolit format 2 jako preva, protoze 2ixaz pro soeci- 
iikaci Glohy musi byt aevuia afisazem programy. Jestiize vsa< onravuje nebo pricava zdrojove p/iKa- 
zy, zvoli si ten format, xtery 2rave pot~equje. 

V rezime vstup vxlada program SYSSEF co zarajoveho souboru nepla:ny zazoam za kazdym patym 
platnym zaznamem (2rikazem). Tim je vytvoren prostar aro nozc®)Si vkladani novych ofixazi aoveit? 
zdrojovero souboru. 


2.5.1 Cislovani_racké 


Pri prekladu zdrojoveno progvam. pridéluje ore.ladat DE/RPG jednotiivym a°1<azam soradova Cis- 
la. Tato isla jsou pax vytisiéna v protokoiu o prexiadu, Prehiadac pridéli pokracovacim oFi<azu 
stejné Cislo jako odpovidaticimu prima-nimu prikazu (i kdyz <azdy z aich 72 predstavovan samostat- 
nym zaznamem Za-ojovéno souboru). Neplatné zaznamy vivec neprecte, a aroto jim searidéli zédné po- 
fadové Cislo. Z tono aivocu se Casto isla prixazi v protoksiu 1181 od poracovych cisel zaznami 
zarojového souboru. 


Program SYSSEP dovoluie pouzit vSechny ‘lavesovée funkce, xteré olati oro araci s transakcnim 
souborem. Tyto funkce zahrnuji: 


vyhledavani , 

praci s druhym souborem (kopirovani), 
vkladani a rugeni zaznami, 

Zruseni vstupu, 

tisk, 

prechoa na dalsi zaznam. 


Vyniedavaci funkce 1sou uzitecnée pri opravacn zdrojoveno programu. I kdyz cisla na prekladovem 
Arotokolu nejsou vzdy totozna s Cisiy zaznami, umozhuji vyhledavaci funkce nalézt alespoh zaznamn, 
ktery je ponliz pivodné hledanéno zdrojoveho prikazu. 

Funkce drunéno souso-u mohou byt pouzity ke <opivavani sxupiny zdrojovych 2fikazd z existuji- 
c1ho souboru do prdvé pofizovaného zdrojoveho souboru v rezimu vstun. To mize oyt uzitecné, jest- 
lize nexolik program pouziva tytéz n*i<ompijovane tabulky nebo algoritmy samoxontraly. 


2.5.3 Potlaceni funcce automat ického vstupu 


Sousor se zdro;ovym programem 2-7 


je zapsan na diskelu. eee take opravit prebth pusiedn{ rubriky formulate (kam se zapisuji [ae ee eae 
klicova slova ve volném formatu, < to taxto: ZruSit stav “ocekdvé> ystup" indikovany systémav, | 3. Zapis zdrojovych 
zpravou 1161 (nebyla stisk~uta ¢2évesa VSTUP, ukazatel bliké v postedni poric: zéznamu) postuynjs ree aap areal 
stiskem klaves NUL a 4- (znak zpét} a pak vloz:{ do postedni pozice pokratovacy znak (+ nebo -), 


Jednoduchy program pro porizovani dat lze vytvorit primo pouzitim progranu EP yietj eros 
tym odpovidanim na vyzvy v obrazovkovych formatech. Pro slozite)5i programy se vSak dopor “Cue pO 
uzit nejprve formulare Z, A aC. Tato kapitola popisuje zapisy, kterymi je mozno vyplnit rubriky ve 
formularich, popr. odpovedet na vyzvy programu SYSSEP, V dalSim vykladu zapisy vztahuji k rub- 
rikam formulard, Vztah rubrik formlard k vyzvam programy SYSSEF je primotary. 


Kazdy zdrojovy prikaz na formulari Z i A se obycejné vejde do jednoho radku zvaného primarmi 
radek. Néktere aplikace si vsak mohou vyzadat vice nez jeden fadek. Z tohoto divodu umozhuje jazyk 
DE/RPG pouzit dalSi typy fadki jakozto doplnék k primarnimu Fadku, je-li zapotfeba daisiho pros- 
toru pro zapis prikazu. Tyto typy radki jsou pokracovaci a sekundarni radky. 


~ Pokracovaci _Fadky rozSifuji rubriku “Volby" (ve formulari Z) nebo "DalSi funkce" (ve furmulari A). 
y dovoluji zadat dalsi testovaci podminky a alternatavy. 


Pokracovaci a sekundarni fadky jsou od primarnich odliseny tim, Ze jiste zapisy, ktere ysou 
v primarnim Fadku povinne, jsou vynechany. Pokracovaci Fa adky musi nasledovat za svym primarnim rad- 
kem, Sekundarni fadky musi nasledovat za primarnim fadkem a za jeho (pFipadnymi} pokracovacim 
radky. Toto poradi mohou naruSovat pouze komentarove Faulhy, Kleré prekladac nezprscovava. 


Nevejde-li se vyraz slozeny z k}igového slova a jeho parametrii do rubriky "Volby", popr. "Dal- 
Si funkce", je tFeba zapsat pokracovaci znak + nebo - jako posledni neprazdny znak v této rubrice. 
Inak + znamend tésnou vazbu, tzn. ze pripadné mezery na zatdtku téze rubriky, ale v nasledujicim 
(pokraCovacim) Fadku, pret] adaz z prikaz: vynechd. Znak - znamend volnou vazbu, tzn, Ze mezery na 
zatatky rubriky “Yolhy" v nasteduj icin fadku poklada piekladac za soucast crivartl Mezery pred 
pokracovacin znakem (+ nebo -) jscu soucdsti prikazu. 


3.2 Obese progracavaci pravidia 


NEkteré pravidla jazyka QE/RPG plati obecné, bez ohledu na typ formuldre nebo prikazu. Jde 
9 pravidla pro tyto prvky: 


Jnera vznatuit (ohu, soubory, zaznamy, pole, tabulky, promenne, 
Rezervavand slova maji speciain{ vyznam. 


on slouzi & udrZeni prikazé ve spravném poradi. 


2-8 DE/RPG - Popis jazya 
Zapis zdrojovych prikazi v jazyku DE/RPG 


K pojmenovani Glohy, soubord, zaznami, poli a proménnych lze pouzit jakékaliv kombinace dale 
uvedenych cnakil za téchto podminek: 


~ Jmina se zapisuji do rubrik vidy zleva. Prvni znak jména musi byt velké pismeno (A az 1), x, 
4, nebo @, Zoyvajici znaky mohou byt velkd pismena (A az Z), Cislice (0 az 9), x, #, @. Uvnit? 
jména nesmi byt mezera. 

~ Jnéna Glohy, scubdord a zaznami mohou byt dlouhd 1 az 8 znakd, ostatni jména nejvyse 6 znakd. 

~ Pojneravané jp-owénné stati definovat v programy jen jednou, bez ohledu na to, kolikrét jsou pou- 
Zity. Je-li prowénnd definovina nékolikrat, musi byt v kazdé definici uvedeny stejné atributy 
(tj, délka a pofet desetinnych mist). 


2.2 Rezervovana slova 
Jnéna labulek nesméji zaéinat pismeny TAB, protoze tato predpona ma v systému specialni vj- 
znam. Specialni vyznam maji i systémové promenné: 


~ 41071 az #7079 jsou jeéna prorénnych pouzivanych jako stfddace. Maji 15 Cislic a Zadna desetinnd 
mista, 

~ #STATO1 a3 ¥STAT29 jsou jména proménnych pouzivanych jako stfddate produkénich statistik. Maji 
rizné délky a jsou popsdna v kap. 9. 

~ UDATE je jméno proménné obsahujici datum. Mi 6 islic a 24dn4 desetinnd mista. Standardni tvar je 
MMDDRR (mesic, den, rok). Klizavym slovem DATE Ize tento tvar zpanit. 


Reze-vovana slova aemusi prograwdtor definovat. Jestlize je véak prece definuje, musi zachovat 
jejich délky a potty desetinnych mist. Proménné #T0T1 az #T0T9 mohou byt pouzity jako zdroj i jako 
cil dat. Ostatai rezervované proménné by se mély pouzivat jen jako zdroj dat. 

Kromé téchto slov existuje Fada dalSich slov se specidlnin vyznamem, kterd jsou pouzita jako 
klitova slova a hodnoty jejich parasetrd. Nekteré Parametry zacinaji hvézdickou (napr. *NOOPEN), 
jiné ne (nap?. PRINTER). 

Vyjimecné postaveni zaujima rezervované slovo #RTN, které nepredstavuje ani proménnou, ani 
kliové slovo, ani paramete, nybrz jen indikaci Pouzitou misto jména pole k vyjadreni prikazu pro 
vyvoldni podprogrami (viz odst. 5.3.5). 


3.2.3 Poradova Cisla 


: Poradova Cisla ve zdrojovych prikazech jsou nepovinna a prekladac je nekontroluje. Mohou vsak 
byt uziteéna Pri zwéné, pridavani, vyrazovéni nebo premisfovani Zdrojovych prikazd. Jediné omezeni 
je to, Ze prvni dva sloupce rubriky "Poradi* nesméji obsahovat dvé hvézdicky (##). 


3.2.4 K1itova 


___Kligové slova pfedstavuji viastnosti a funkce. V&tdina kli€ovych slov ausi byt doprovazena 
jednim nebo nékolika parametry, které definuji vlastnosti nebo funkce podrobnéji. Parametry musi 
nasledovat za kligovym slovem a musi byt uzavreny v zévorkéch. 

Obecny tvar kligového slova a jeho parametrd je tento: 


klitové slovo ( parametr parametr ... ) 


,,. Jestlize je zadéno nékolik parametrd, musi byt kaidy nasledujici parametr oddélen od piedcho- 
ziho alespoh jednou mezerou. 
_ Na jednom Fadku adie byt zapsino n@kolik klicavych slov. Kligové slovo, které nema parametry, 
musi byt oddéleno od nésledujiciho kligového slova alespoi jednou mezerou. 


3-2. DE/RPG - Popis jazyka 


Podle téchto pravidel maji nasledujici tri radky stejny vyznam pro pfrekladac: 


EOJ SLNO(Z) CURL(#NO) 
EGJ SLNG(3)CLRi(#NO) 
€03 SLNG (3) CLRL ( #NO ) 


Jedind povinna mezera v uvedeném prikladu je mezi klicovym sloven EQJ a kli¢ovym slovem SLNO. 
Jestlize se klicové slovo s parametry nevejde na jeden radek, je treba pouzit pokracovaci znak 


(viz odst. 3.1.1). 


3.2.5 Konstanty 


fiselné konstanty jsou libovolné kombinace Cislic 0 az 9, do nichz mize byt vlozena_ desetinna tecka 
(nebo carka) ‘a znamenko (+ nebo -). Znamenko, pokud je pouzito, musi byt umisteno pred prvi cisli- 
ci. Jestlize znaménko neni pouzita, je hodnota konstanty kladna. Deset inna tecka (nebo Carka) v ci~ 
selné konstanté urcuje mistni (pozicni) hodnoty Cislic a je pouzita v aritmetickych (dekadickych) 
operacich pro zarovnani vysledku. Sama vSak neni zaClenéna do dat. Ciselné konstanty nesméj1 obsa~ 
hovat vice nez devet desetinnych mist. Nesm2ji obsahovat mezery a nesméji byt uzavreny v apostro- 


fech, 


nty jsou libovolné kombinace znaki vcetné mezer. Znakové konstanty musi byt uzavreny 
Agostrof, ktery ma byt zahrnut do dat, musi byt zapsan jako dvojice apostrofi. Zna- 


Indixdtory jsou zvldstni proménne, které se oznaCuji dvoucifernymi Cisly od 01 do 99 a slouzi 
ke zkraceni zapisu réznych podminek (vysledki operaci, typi prectenych zaznami apod.). Mohou naby- 
vat jen dvou hodnot - zapnut, vypnut. Indikatory lze v programu nastavovat (zapinat, vypinat) a tes- 
tovat {tj. podmifovat jimi vykon prikazi nebo klicovych slov). 


Poznamkové prixazy se nepfekladaji, ale dovoluji za¢lenit do zdrajového programy vysvétlivky 
pra jeho dokumentaci. Mohou byt umistény kdekoliv ve zdrojovém programu, krome ¢asti s defimici 
prikompitovanych tabulek a €dsti s definici samokontroly. 

Poznamkovy prikaz je urcen hvézdiékou (#) ve sloupci 7. Sloupce 8 az 80 pak mohou obsahovat 
libovalay text (paznamku). 


3.4 Popis. pf ikazt 


Nasleduy ici tri kapitoly popisuji prikazy, které se pouzivaji k zapisu programu. “Uvade)1 ab- 
Sah a wyznam kazdé jejich rubriky, Na konci kazdeho dseku je kratky priklad ilustrujici zapis pri- 
¥azu do formulare. 


Zapis zdrojovych prikazé v jazyku DE/RPG 3-3 


[Toeeenennne: 


a) 
| 4. Formular Z | 
) 


Formular Z se pouziva k zapisu prikazi pro specifikaci Wlohy, prikazé pro vstupni format a pri- 
kazi pro prohlizeci format. 


Prikaz pro specifikaci ulohy pojmenovava ulohu a specifikuje funkce souviseyici se Soubory 
pouzitymi v pribéhu vypoctu. Mize take urCovat tvar data a ménovy symbol. 

Pri prekladu musi byt prikaz pro specifikaci Ulohy zarazen ve zdrojovém programu jako prvni, 
kromé poznamkovych pritazi, kte-é jediné mohou byt zarazeny pred nim. 

Rubriky, které se pevzivaji v prixazech pro specifikaci dlohy, jsou vyznaceny jako nesrafova- 
né na cbr. 4.1 


5 oF TE ES FS es Re OOS Be Vga eee ee 
| | Volby 
Podminky eemneanennnnccn ane wnnnn: on 
Uloha: 
bb puisietatanensteataieieceteenen Dalsi format CFILE EXITATR SHARE 
| Testovaci znak (0-9,A0-29) DATE  JOBOPT SHARER 


Rezim 


ee | omen 


| | EDITC  PRTFILE STATUS 
“7 ENTRATR SFILE  TFILE 
Hel || ie EQJCTL 


Vstupni format: 
CLRL SLNO 
EOJ WRITE 

7 


Tato stranka je prazdna Umysiné os L! [oom 
anne 
3| 


| 
\47 
(i 
| 
| 
(ee 
| 


Obr. 4.1 


Do této rubriky zapiseme pismeno Z. 


3-4 DE/RPG - Popis jazyka Formular Z 4-1 


4.1.3 Typ 


Do této rubriky zapiSeme pismeno J. 


Do této rubriky zapizeme jméno dlohy pocinaje sloupcem 10. Jméno Ulohy se zobrazi ve stavoven 
Fadku obrazovky, jestlize pri vypoctu dojde k chybe. 


4.1.5 Volby (sloupce 55 az 80) 
ee AS Dutcenne Ona ee 


Do této rubriky mdzeme zapsat nasledujici klicova slova s odpovidajicimi parametry. Klicova 
slova mohou byt uvedena v libovolném poradi. 


CFILE jména kopiravaciho souboru (copy file), 

DATE tvar data (date), 

EDITC ediéni znaky (edit characters), 

ENTRATR Zobrazovaci atributy vstupnich poli pri vkladani do pole (entry attributes), 
EQJCTL modifikace ukonceni tilohy (end of job control), 

EXITATR zobrazovaci atributy vstupnich poli po opusténi pole (exit attributes), 
JOBOPT wodifikace zahajeni Glohy (job options), 

PRIFILE jméno tiskového souboru (print file), 

SFILE volba souboru a typu statistiky (statistics file), 

SHARE jména soubor’ sdilenych pri Cteni i zdpisu (shared files), 

SHARER jména soubor sdilenych jen pri éteni (shared files for reading only), 
STATUS stav pridavného zarizeni (device status), 

TFILE jméno a typ transakéniho souboru (transaction file). 


Rubrika "Volby" mize byt rozSifena pokracovacimi fadky, je-li tieba dalgi misto pro zapis, 
K tomu poudijeme jen rubriky "Formula?" a "Volby". 


CFILE ¢ jméno ) 


_ _Kligevé slovo CFILE Zapisujeme, chceme-li pri vypoctu pouzivat kopirovaci funkci. "Jméno” mu- 
si byt jmeénew souboru, z néhoz se data kopiruji. Pri vypoctu si program vyzada od operdtora daléi 
udaje 0 tomto souboru (jméno a zarizeni), takze skutecné jméno souboru na disketé mize byt jiné ned 
to, ktere bylo zadano u kligového slova CFILE. 

__Klitove slovo CFILE nemizene pouzit, jestlize jsme nezadali také klicové slovo TFILE - trans- 
akcni soubor. Délky logickych zdznami transakéniho a kopirovaciho souboru musi byt stejné. 


DATE ¢ *DMY ) 
DATE « #YMD ) 
DATE ( #MDY ) 


Kligovym slovem DATE mizene zrénit tvar obsahu systémavé proménné UDATE obsahujici datum, Ne~ 


ni-li kligové slovo DATE pouzito, zistava datum ve standardnia tvaru MMDDRR (mésic, den, rok). 
,_ Parametr #DMY méni tento tvar na DDMMRR (den, mésic, rok), parametr *YMD na RRMMDD (rok, mé- 
sic, den), zatimco parametr #MDY zachovava standardni tvar WMDDRR (mésic, den, rok). 


a 
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eDITC ( ‘znaky’ ) 


iG izovym slovem EDITC mbzene zménit edicni znaky pro dpravu cisel $ ménovym symbolem a edic- 
Mt znaky pro Gpravu data. Edicni znaky se pouzivaji ve spojitosti s klicavym slovem EDTCDE. 

Parametr “znaky" je znakovy retezec o peti znacich a mus) byt uzavren v apostrofech, Prvni 
a druid pucice predstavuji ménovy symbol, treti predstavuje znak pro vyznaceni desetinnych mist 
v cisle, ctvrtd predstavuje znak pro oddéleni tisicd a pata predstavuje znak pro Clenéni data. 

Neni-li klicové slovo EDITC zadano, je to stejné, jako ty bylo zapsdno EDITC (' %.,/'), kde 
wezer'a a X reprezentuji ménovy symbol, tecka je znak pro wyznaceni desetinnych mist, Carka znak pro 
addéleni tisicé a lomitko znak pro Clenéni data. Znak pro Clenéni data mize byt jen / (lomitko) ne- 
bo. (tecka). 


ENTRATR ( atributy ) 


Kiigovym slovem ENTRATR mizeme definovat zobrazovaci viastnosti (atributy) uplatnéné na kazde 
vstupni pole behem vkladani dat do tohato pole. V parametru mize byt zadéno nékolik atributd. Toto 
kiitové slova prebiji vSechny atributy zadané v prikazu pro popis pole, jakmile pri vypoctu do to- 
hoto pole vstoupi ukazatel. VyZaduje prazdnou pozici tésné pred zobrazenyni daty a prazdnou pozici 
tésné za nimi u kazdého vstupniho pole na obrazovce. Je-li vkladani dat do pole ukonceno, zobrazi 
se pole znovu s noridlnimi atributy nebo s atributy zadanymi v klicovém slove EXITATR (je-1i pouzi- 
to}. = 

Wizeme zadat tyto atributy: 


Reet, F » | 
Atribut 

Zobrazeny zaznam blika - zhasina a rozsvéci se (blink). 

Mezi znakovymi pozicemi se zobrazi oddélovace - 
- tenké svislé Cary, které neomezuji kapacitu 
obrazovky (column separators). 

Zobrazené znaky zari zvy$enou intenzitou (highlight). 

Pole y zaznamu se nezobrazuji (not displayed). 

Pole v zaznamu se zobrazuji inverzné - tmave 
znaky na sviticim podkladé (reversed images). 

Kazda znakova pozice v polich zaznamu se podtrhne 
(underline). 


Kombinace HI RI UL je chybna; pole se nezobrazi. 


EQUCTL ( format indikdtor #STATUS ) 


Kligovym slovem EQJCTL mizeme modifikovat Ucinek klavesové funkce “konec prace". Po pouziti 
klavesové funkce "konec prace" (nebo po dosazeni konce dat v rezimu kontrola) mize byt zobrazen 
zyoleny obrazovkovy format, popr. zapnut zvoleny indikdtor, aniz by vypocet skoncil. , 

Parametry jsou nepovinné a mohou byt zapsdny v libovolném poradi. Jeli klicove slovo zadano 
bez parametrd, klavesava funkce "konec prace" se neuplatni a program se neuknnci. Neni-li klicove 
Slovo EQJCTL zadano, ukonéi kldvesova funkce "konec prace" vypocet standardnim zptsobem (viz odsta~ 
vec 9.9.2), 

Parametr "format" urcuje fddek formuldre Z, ktery ma prevzit rizeni vypoctu po pouziti klave~ 
Sové funkce "konec prace" (nebo po dosazeni konce dat v rezimu kontrola). Je to ten Fadek, ktery 
Obsahuje v rubrice "Foreat” (sloupce 8 a 9) stejny identifikaéni kod jako parametr “format” v kli- 
Cove slové EQJCTL. Ve vypacetnim rezimu (viz odst. 9.3.1) prevezme zminény radek Fizeni vypoctu po 
havratu 2 formulare C do formulate Z. V jiném nez vypocetnim rezimu prevezme tento radek rizeni vy- 
Poctu po névratu z formulare C do formulare A, byl-li zpracovavan podprogram v ramci klicoveho slova 
EASR. Jinak prevezme Fizeni vypottu ihned. 
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Parametr “indikator" predsiavuje indikator (31 a2 99), btery se zapne po pouziti *lavesove 
funice "“bonec prac nebo po dosazeni honce dat v rezimu kontrola). Zpocatku je tento indivator 
vypout. Ma-t1 by? v t opakcvané, musime je) nékde jinde v programy vypinat. 

Parametr #STATUS Lmozfiuje pouzit klavesovou funxc1 “konec prace" i ¥ ramci cperace EXFMT 
S indisatorem. Jestiize operator pouzije «Javesovou funkci “konec prace”, ulozi se do pramenne 
definovane klicovym slovem STATUS Cislo zpravy 9537. k tomu vSak nedojde, neni-li v operaci EXFMT 
cadan indikator, i 

Soznamka: Funkce EQJCTL ye zpocatku patlacena (dokud vypocet nevstoupi do prvniho obrazovio- 
veho format). Klavesova funkce "konec prace" mize ukoncit vypocet, jsou-Ji v kli¢ovem slové EQJCT. 
zadany jakekoliv parasetry a ve formilari Z je zadano klicové slovo EQJ; neni-l: \licave slovo 
EOJ zadano, whze vyvstat utmost odstranit program z oddilu provedenim procedury IPL (pocatecni 
zavedeni system). 


EXITATR ( atributy } 


Klicovym slovem EXITATR mizeme definovat zobrazovaci vlastnost: (atributy) uplatnéne na kazde 
vstupni pale, pote co ¢o néj bylo dokonceno vkladani dat. Kromé toho tyto atributy pisabi na pros- 
tor za praveé zpracovavanym polem, jakiale do tohoto pole vstoupi ukazatel. Tento Prostor saha az 
k dalSimu poli (popr. az na konec obrazoviy). Kligové slovo EXITATR plati jen spolecné s ilicovyn 
slovem ENTRATR. 

Hodnoty parametré - atributy - jsou tytéz jakou klicového slova ENTRATR. tlicové <love 
EXITATR nezaddvame, nepotiebujeme-11 zvléStni, nezvyklé® zobrazeni. Neni-l1 zadano, zobrazuji se 
pole s sormalnimi atributy ‘bez zvyraznéni). Atributy zadane v klicovem slové EXITATR mohnou zpiso- 
bit neZadovci efekty ne obrazovce. 

V zavistosti na pouziti klicovych slov DSPATR, ENTRATR a EXITATR mize byt ystupni pole zobra- 
zeno trem riznymi zpisoby podle umisténi ukazatele: 


aa [oeennnnnnwanaanenenyannsnnenanennnenensnenncennssnenen. 


| Prikaz | Kdy se atributy uplatni 


DSPATR Popis pole Od pocatecnino zobrazeni formatu, dovud 
| ukazatel nedosahne tohoto pole. 
Specifikace ulohy | Y pravé zpracovavaném poli, pokud je 
ukazatel uvnit? tohoto pole. 
EXITATR Specifikace ulohy | V pravé zpracovavanen poli, jakmile Jiazatel 
toto pole apusti (dopredu nebo zpet: 


a 
| 


ENTRATR 


JOBOPT ( #NOPMT ) 
JOBOPT ( *NOCPEN ) 
JCBOPT ( #NOPMT 4NOOPEN ) 


_ Na zacatku vypoctu se za normalnich okoinosti zobrazi Napovedi, dovolujici operatorovi zmenit 
jJmena soubor a jim pridélena zarizeni. Chceme-11 tyto Aapovedi potlacit, “pouzi jeme klicove Slovo 
JOBOPT (job Options) = parametrem #NOPMT ino Prompts). ¥ tom pripad® pouzije progran jména soudoré 
a jim pridélena zarizeni zadand ve zdrojovem programy (formular A), aniz by zobrazovai napovedi. 

Na zaCatku vypoctu se za normalnich axo!nost i Oteviraji vSechny soubory s vyjinkou komunitac 
nich, Chceme-11, aby otevreni soubord bylo odlozeno az do chvile, kdy s nim) program teprve zacne 
Pracovat, Puuzijeme klicové slovo JOBOPT s Parametrem #NOOPEN, V tom Pripadé musi byt provedena 
Operace OPEN (zapsana ve formulati C) jeste predtim, nez se zatne se souborem pracovat. Transaiéni 
soubor se vsak v kazdém pripade otevira na zacatku vypoctu. 
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ORTFILE { jméno } 


Klidové slovo PRTFILE pouzijeme tehdy, chceme-i béhem vypoctu pouzit klavesovou funkci "tisk" 
(neforwatovy tisk). Paranetr "jmeno" uréuje tiskovy soubor. Tento soubor vyzZaduje prikaz popisu 
souboru k identifikaci tiskarny. a oth ‘ 

Kliécvé slovo PRTFILE mizeme zapsat jen tehdy, zapiseme-i1 také klicové slovo TFILE (transaké- 
ni soubor). Délky logickych zaznami tiskového i transak¢niho souboru musi byt shodne. klicove slovo 
PRIFILE nemusime zapisovat, jestlize pouzijeme formatovy tisk ve formulari Ca nechceme pouzivat 
klavesovou funkci “tisk”. KJicové slovo PRIFILE nevylucuje formatovy tisk, nesmi véak pracovat 
5 tintéz souborem, 


SFILE ( jméno ) 
SFILE { jmeno typ ) 


Klicové slovo SFILE zadaéva Udaje pro produkéni statistiky: 


- Jnéno souboru, na néjz se statistiky maji zapsat (parametr "jméno"). 
- Typ produkéni statistiky: za Glohu, pracovisté, nebo oboji (parametr "typ"). 


Kliéové slovo SFILE plati pouze s klicovym slovem TFILE (transakéni soubor). 

Paranetr "jméno" musi odkazovat na disketovy soubor popsany ve formulari A. Popis tohoto sou- 
boru mize (ale nemusi) obsahovat jeden popis zaznamu vcetné popisu poli. Tento zaznam se zapise 
na soubor pred statistickymi udaji. Obsahuje obycejné idaje popisujici nasledujici statisticka 
data. Kaidy soubor ma zpravidla svij vlastni, jedinecny popis, napr. STATISTIKY Z PROGRAMU PROGI, 
DNE 14.02.86. Statisticky soubor musi mit zaznamy dlouhe 128 slabik. 

Paranetr "typ" urcuje typ statistiky. Platné typy jsou #JOB, #STATION a #BOTH, Znamenajicis 
Uloha, pracavni stanice a oboji. Tyto typy odpovidaji volbam 1, 2 a 3 v ndpovédi zobrazené na konci 
vypoctu. Neni-li parametr "typ" zadan, plati *BOTH. z z 7 

Neni-li klicové slovo SFILE zadano, zobrazi se na konci vypoctu napovéd, podle niz operator 
zad3 idaje 0 souboru a typu statistiky. ; 

Je-li kli€ové slovo SFILE zadano, nemize operator tyto ddaje volit; nenalezne-li se vsak na 
uréenéa zafizeni soubor daného jména, zobrazi se na konci vypoctu napoved, podle niz operator mize 
zvolit bud alokaci souboru (vyhrazeni mista na disketé), nebo novy pokus (s pripadnou vyménou dis- 
kety). 

Poznamka: Jestlize klizové slovo DEVICE na formulari A (pro statisticky soubor) neurcuje 
adresu zavizeni, pouZije se zarizeni, na némz je umistén transakéni soubor. 


SHARE ( jméno jméno ... ) 
SHARER ( jméno jméno ... ) 


Klitové slovo SHARE (sdilet) urcuje soubory, které mohou byt sdileny jinymi programy béhen 
provadéni tohoto programu. Parametry "jméno" znamenaji jména soubord. Jiné programy mohou s témito 
Soubory provadét operace Cteni, zapisu a prepisu. ; 

Kli€ové slovo SHARER ma stejnou funkci jako SHARE, az na to, ze pristup ostatnich programd 
k vyjmenovanym soubordm omezuje jen na Cteni; nedovoluje jim zapis ani prepis zaznami. 

Jeli v kligovém slové SHARE nebo SHARER uvedeno jméno transakéniho souboru, nelze do tohoto 
Souboru vkladat nové zaznany; je-li uvedeno jméno klicovaného souboru (viz téz odst. 12.1.2), nelze 
na tento soubor zapisovat. 

_ Jeli popisovany program aktivni, nemohou ostatni programy sdilet soubory, ktere nejsou vyjme- 
Novany u klifového slova SHARE nebo SHARER (a jsou pouzity v popisovaném programu.) Ma k nim pri- 
Stup pouze popisovany program. 
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STATUS ( jmeno ) 


Kli€ovée slovo STATUS (stav) definuje proménnou, v niz je po chybé vstupni/vystupni operace 
zakodovan stav vstupniho/vystupniho zarizeni. Prikaz pro tuto operaci musi byt zapsan ve formu. 
lari C a musi v ném byt zadan vysledkovy indikator. 

Parametr “jméno" definuje Ciselnou proménnou o 4 éislicich bez desetinnych mist. Po chybé se 
do této proménne ulozi tyrmistné ¢islo, jeho? vyznam Ize nalézt v prirucce "BAL-Prirutka syster 
movych zprav". 
¥ prikazu pro vstup/vystup zapsén vysledkavy Indikator, ukladaji se tyto kody: 


[rrmeenennenn yonnnnnnnnnnnn gen 
izeni | V/V-operace 
| Disketa | OtevFeni 


~ Pri inicializaci programu se neuklddé = day chybovy kad 
souboru ro 


~ Je-li zapsan prik@ OPEN ve formulari C, kody 2705 799, 


$432, 3211 a 3215 se neukladaji. V téchto pripadech 
se zobrazi chyboyy kéd nebo napoved. 
~ VBechny ostatni chybove kody se uklddaji. 


| 
| 
ee 


Uzavreni Pri ukonCovani programy se chybové kody neuklddaji, 
| souboru | ale zobrazuji. 
1 VSechny chybové kédy se ukladaji, az na kd 3151, ktery- 

se vzdy zobrazi. 


Disketa Ostatni 
operace 


Komunikace 


VSechny Vsechny chybor 
| operace | ukonéuje vypocet. 


Tiskarna | VSechny § Kady se ukladaji vidy kromé doby, kdy se 
operace ukoncuje vypocet. 
aa nee 


| Obrazovka | EXFMT | Viz prikaz EXFMT v kap. 6, 


ee eenaewnanwtannnneenanenndenncann, 


feces 


TFILE ( jméno 

TFILE ( ymena pocet ) 

TFILE ( jméno rezim ) 

TFILE ( jméno pofet rezim ) 


_.__ Toto klicové slovo musime zadat, chceme-11 Pouzit transakéni soubor. To je treba ve vetsine 
Uloh porizovani dat. 


Parametr "jméno" musi byt jméno disketového souboru Popsaného na formulari A prikazem pro 
Popis souboru. Parametr je povinny. 

Paramet, “pocet” je nepovinny; zadava pocet platnych datovych zaznami, které se maji zapsat 
na soubor (béhem Porizovani) mezi neplatné zaznamy. Jakmile Je na soubor zapsan zadany pocet olat- 
nych zaznamd, zapise se zaznam oznaceny jako neplatny. Tento zaznam je pak nasledovan zadanym pot- 
tem platnych zaznami, za nimiz je zapsan dalsi neplatny zdznam ald. Pritomnost neplataych zaznami 
je vyhodna, je-li teba pozdéji vkladat dovnit souboru nove Zaznamy, Neplatnd 24 
Pinani souboru, které je jinak nutné k uvolneni 
zaznami, které musi byt premistény. Tim se taka zk 
my Nelze pri zpracovani souboru cist. 

Parametr "rezim" je nepovinny. Platné Zapisy jsou #ENTER, #UPDATE, #VERIFY, ADD,  #RERUN 
a odpovidaji rezi vstup, zména, kontrola ‘prezkouseni), rozSireni, prepocet. Zvolime-1i .eden 
z techto rezimi ve zdrojovém Programu, zahaji a 
a napovéd s volbou rezimu, v niz jednotlive 
takto: 


any tiumi foz- 
mista pro vkladané Zaznamy, a omezuji tak pote! 
fati doba potfebnd ke vkladani, Neplatné zazne- 


vykunny program praci v tonto rezimu, Nezobrazuje 
Otislované volby odpovidaji parametru “reziin" 
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¥ENTER 
#UPDATE 
#VERTIFY 
. *ADD 
.  #RERUN 


Poznamka: Neplatne zdznamy se vkladay i az pote, co operator souvisle vlozil zadany poe 
nami z klavesnice. Jestlize operator rusi (zneplathuje) , prepisuje nebo kopiruje ne jake 
jesté drive, nez je dosazeno jejich zadaneho pottu, eitani vkladanych zaznaml se prerusi a 
znovuj potet datovych zaznaml mezi neplatnymi zaznamy tak mize byt Promenl ivy. ] 4 
Je-li zapsano klitové slovo TFILE, jsou uzivateli automaticky i dispozici xlavesové funkce 
usnadfujici poFizovani, kontrolu, opravy a prohlizeni dat. Klavesové funkce ovlada Operator (stiskem 
urcitych funkénich a datovych klaves) a zprostredkovava je systen Pomoci tzv. spoletnych funkci 
(varianty SYSCFBO1, SYSCFBO2 nebo SYSCFBO3 - viz prirucku "Consul 271 Priruéka systemoveho pro- 


gramatora"). 
Jsou to tyto funkce: 


Automaticka duplikace 
Automaticky preskok 
Automaticky vstup 

Blok zpat 

DalSi format (FMT KROK) 
DalSi zaznam (LIST KROK) 
Duplikace 

Hledani konce dat 

Hledani podle cisla zaznamu 
Hledani podle obsahu 
Hledani setFidéného obsahu 
Oznaceni pole 


Potlaceni ediénich kontrol 
Rezim kontrola 

Rezim prepocet 

Rezim ystup 

Rezim zména 

Smazani obrazovky 

Vlozeni zaznamu 

Vstup / Blok krok 

Vybér formatu 

Zobrazeni kontrolovaného zaznamu 
Zruseni zaznamu 


Pouziti téchto funkci je podrobné popsano v kap. 9. 


[rrsernennenpownnennnnnnnnnnqennnenanane 
Format 
(1-9, 0-29) 


Rezim 


A 


pozice 
#P0Snnnn 
si 


| 
Al 
| 


2456789 


Podminky 


Typ jmena a preenemaeneneenenen 
pee) | Testovaci znak 


Se a 
| Vol by 
Uloha 
Dalsi format EXITATR SHARE 
(0-9, A0-Z9) 


Vstupni format: 
CLRL SLND 


Prikazy pro vstupni format urcuji typy zaznamd pro vkladani dat a mohou také urcovat jeyich 
poradi pri vypoctu; urcuji také vyyolani podprogramd zapsanych ve formulari C. 

Pred prikazy pro vstupni format musi predchazet prikaz pro specifikaci Glohy. ; 

Rubriky, které se pouzivaji v prikazech pro vstupni format, jsou vyznaceny jako neSrafovang 


na obr. 4.3. 
[ont e ee een een panenemnnemnnenapanemamann mann mnaennen 


Podminky oa Aa oS 
ona: 


DalSi format CFILE EXITATR SHARE 


‘T 
| Volby 


| 
(0-9, A0-29) | DATE JOBOPT SHARER 
| EDITC PRTFILE STATUS 
Relace ENTRATR SHARE = TFILE 
jmemreneyeny | feemeseny provernend EDICT 
Testov. Vstupni format: 
pozice EQ} 'z' | CLRL SLNO 
#P0Snnnn EOJ WRITE 
| 6 7 


Be ae 


4.2.1 Poradi_(sloupce 1_az 5) 


Do této rubriky mizeme zapsat poradové Cislo prikazu. 


4.2.2 Formular (sloupec 6) 


Do této rubriky zapiSeme pismeno Z. 


Do této rubriky zapisujeme identifikacni kéd vstupniho obrazovkového formatu. Kod mize byt 
jedno- nebo dvouznakovy a zapisuje se vidy pocinaje sloupcem 8. Jednoznakovy identifikacni kod musi 
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byt cislice ad 1 do 9, dvouznakovy musi zacinat velkym pismenem (A az Z) a jeho druhy znak musi byt 
dislice (0 az 9). ahi Arden ey ; 3 

Lipis je povinny v kazden primarnim Fadku | prikazu pro vstupni format, a toi tehdy, je-li 
timto prikazem vyvolavan podprogram ve formulari C. Identifikacni kdd slouzi k vybéru  vstupniho 
fornstu nebo podprogramu, Vyber nize Provést jak program, tak Operator. Pro vkladani dat mize 
wit poradi ystupnich formatd predurceno zdrojovymi prikazy, ale operator mize vidy toto poradi 
znénit pouzitim klavesove funkce "vybér formétu" nebo "dali format". 


4.2.4 Jano (sloupce 10. az 17) 


Do této rubriky zapisujeme jméno zaznamu, ktery je popsan ve formulari A jako soucast popisu 
souboru odpovidajiciho zarizeni klavesnice/obrazovka (CRT), nebo jméno podprogramu popsaného ve 
formulari C. Egie.a 2 , : 

Tapis je povinny v kazdém primarnim Fadku prikazu pro vstupni format. 

Kaidy program, ktery pouziva komunikatni soubor (COMM), nebo program, v némz je vypocet fizen 
prikazy formulate C, musi obsahovat alespon jeden prikaz pro vstupni format se jménem podprogramu. 

Jméno musi zacinat ve sloupci 10, 


4.2.5 Rezin (sloupec 21) 


Do této rubriky zapiSeme pismeno E (entry). 


4.2.6 Rubriky Opakovani (sloupec 20), Podminky (sloupce 23 a2 30 a 35 a? 27) 
a Dal3i forest (sloupce 45 a 44) 


Pryni vstupni format nebo podprogram provadény pri vypoctu je urcen prvnim zdrojovym prika~ 
zen pro vstupni format zpracovanym pri prekladu. Poradi vstupnich format v daléim vypoctu je urco- 
vano jednim ze tri nasledujicich zpisobd: 


> Rucni zpisob. VyZaduje pouziti klavesové funkce "vyber formatu” nebo "dalsi format". 

~ Automaticky zpisob. Vypocet prechdzi ke vstupnimu formatu, urcenému v rubrice "DalSi format", po 
tolika provedenich soucasného forndtu, kolik jich bylo uréeno v rubrice “Opakovani", nebo po 
pouziti klévesové funkce "dalSi format". 

~ Podninné automaticky zpisob. Vypotet prechazi ke vstupnimu formatu urcenému v rubrice "Dal3i 
format", jestlize vstupni zaznam obsahuje v urcité pozici zadany znak. 


Vstupni formaty s podprogramem (zadanym v rubrice "Jméno") musi pouzivat automaticky zpisob. 
Ruéni zpisob zvol {me zépisem pismena N do rubriky "“Opakovani". 


vAutonaticky zpdsob zvolime zapisem Cislice 1 az 9, kterd urtuje pocet opakovani soucasného 
format, do rubriky "Opakovani". Do rubriky "Dalsi format" zapiseme aidentifikacni kod pristiho for- 
atu, Rubrika "Podminky" ziistava prazdna. V prikazech pro vstupni format, které obsahuji jméno 
podprogramu (v rubrice "Jméno") musi byt zadan potet opakovani 1. 


aes automat icky zpisob vyzaduje vyplnéné rubriky "Podminky" a "Dali format". Chceme-1i 
dande kaady vstupni zaznam, uvedeme ¥ rubrice "Qpakovani" Cislo 1. Chcene-1i pozdrzet testovani, 
zeae iy ,Zracovan urcity pocet ystupnich zaznami, uvedeme v rubrice "Opakovani" Cislo 2 az 9. Po- 
P05} sie testuje Obsah vstupniho zdznamu, se zapisuje do rubriky “Testovand pozice" ve tvaru 
rn pele. Tnak, $ nimZ se porovnava obsah vstupniho zaznamu y zadané pozici, se zapisuje 
twang i Testovaci zaak" mezi dva apostrofy. Jestlize se testovaci znak shoduje S obsahem v tes- 
Pic raylts 11, vybere Se jako dalSi format ten, jehoz identifikacni kod je zapsan v rubrice "Dali 

+ Jeli tato rubrika prazdnd nebo jestlize se porovnavané znaky neshoduji, opakuje se dosa- 
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vadni format. 


K podmineénemu vybéru formatu mizeme pouzit i vice jednoznakovych testi. Prvni test je zapsin 
na primarnim fadku, dalsi testy pak musi byt zadany na sekundarnich fadcich; testy sou spoly 
ve vztahu “nebo”. Testy ve vztahu "a" nelze uskutecnit. Rubriky "Format", "Jméno" a "Opakovani* 
musi zistat v sekundarnich fadcich prazdné. Zbyvajici rubriky se vyp] fuji jako v primarnin Fadku, 
Nékolikanasobné testy se provadéji v poradi, v némz jsou zapsany. Prvni test, ktery vy}de,  zpdsobi 
prechod na odpovidajici format (zadany v rubrice “DalSi format" tehoz Fadku). Jestlize ponechine 
rubriku "Podminky” prazdnou, ale zadame identifikacni kod v rubrice “DalSi format", a jestlize Zadny 
Z predchazejicich tes! nevy5el, vybere se tento format. 


Do této rubriky lze zapsat jen tato klicova slova s odpovidajicimi parametry: 


CLRL =~ vymaz 7adkd (clear lines), 
EOs ~ konec prace (end of job), 
SLNO = - Cislo pocatetniho radku (starting line number), 
WRITE - zapis v jiném tvaru (write in another format), 


Rubrika "Volby" mize byt rozSifena pokracovacimi Fadky, je-li treba daléi misto pro zépis, 
K tomu pouzijeme jen rubriky "Formular" a "Volby". 


CLRL ( potet ) 
CLRL ( #NO ) 


Klicové slovo CLRL umoziuje omezit pocet Fadkd obrazovky, které se vymazou na zacatku pravé 
Zpracovavaného vstupniho formatu. 

Parametr “pocet" udava pocet radki, které se maji vymazat, pocinaje pocatecnin fradkem zade- 
nym kligovym slovem SLNO. 

Parametr #NO zachovava predchozi obraz na obrazovce; vsechny polozky zobrazené pravé zpracove- 
vanym formatem se s predchozim obrazem prekryvaji. 

Neni-li kligové slovo CLRL zapsino, vymazou se vSechny Fadky predchoziho obrazu od pocatecnito 
Fadku do konce obrazovky. 


EOI 

EQ] ( #PASS ) 

EOJ ( 'jméno' zaFizeni ) 

EOQJ ( 'jméno' zarizeni #*PASS ) 
EOJ ( jméno zarizeni ) 

EOJ ( jméno zarizeni #PASS ) 


Kligové slovo EOJ (end of job) slouzi k ukonéeni Programu bez pouziti klavesove funkce 
"konec prace". Mize byt zapsdno bez parametr’i nebo s nimi. Je-li zadano, musi rubrika “Daléi 
format" zistat prazdnd; daléi format je nahrazen ukonéenio programu. Klicové slovo EOJ mize by! 
Zapsano na primarnim Fadku nebo na sekundarnich Fadcich prikazu pro vstupni format. Klicové slov 
EOJ se neuplatni, je-li k ukonéeni vypoctu pouzita klavesova funkce "konec prace". 

Klicové slovo EOJ bez parametrd zpdsobi normdlni ukonéeni vypottu, stejné jako klavesov 
funkce "konec prace". 

Parametr #PASS (minout) potlacuje volbu typu a vystup Produkénich statistik. 

Parametry “ 'jméno' —zarizeni * a" jméno  zarizeni * zpisobi vyvolani a spusténi dalsito 
Programy urceného témito parametry. Prvni z nich predstavuje jméno disketového souboru, v némi | 
ulozen vykunny program. Toto jméno nemusi byt nutné totéz jako jméno zapsané v rubrice "Jnéno" 
Vv prikazu pro specifikaci Wlohy. Je-li jméno uzaveno v apostrofech, je konstantni - zadané pri 
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prekladu. Je-li bez apostrofé, zadava se pri vypoctu v Proménné pojmenované timto jménem. Zacind-li 
toto jreno mezerou, zplisobuje normal ni ukonceni vypoctu. ia : 

Parametr "zarizeni” musi byt zadan zaroven se jnénem Programu, Mize byt zapsan dvéma zpisoby: 
- jako dyouznakovy logicky identifikator definovany pri konfiguraci systému (napr. Pi), 
- jako CtyFznakova fyzicka adresa zarizeni vyjadrena ve tvaru X'nnnn' (napi. X'4400'), 


SLNO { Cislo ) 


Kligové slovo SLNO (starting line number) urCuje nejvyse polozeny radek obrazovky, ktery mize 
byt pouzit prave zadavanym formaten. VBechna cisla Fadké pouzita v Popisech poli jsou vztazena & 
{omulo Fadku, jakozto Fadku cislo 1. Napriklad, Zapiseme-1i SLNO(3) a pr'idélime poli fadek cislo 2 
(v prikazu pro popis pole), zobrazi se toto pole v fadku Cislo 4. 

Paranetr “Cislo" smi byt celé Cislo od 2 do pottu Fadki na obrazovce. Chceme-1i pouzit klicove 
slovo PAT k zobrazeni népovédi, zvolime Cislo 3 nebo vétsi, protoze napovédi se zobrazuji vidy na 
fadku Cislo 2. ~ 

Neni-li klicove slovo SLNO zapséno, je pocatecnim radkem formatu radek Cislo 2. 


WRITE ( #N0 ) 
WRITE ( jméno ) 


Kligovya sloves URITE mizeme bud potlacit zapis pravé zpracovavaného zaznamu na transakéni 
soubor, nebo zménit tvar zaznamu zapisovaného na transakcni soubor. 

Parametr #NO potlacuje zapis zaznamu na transakéni soubor. 

Parametr "jméno" musi byt jméno zaéznamu uvedené v prikazu pro popis zaznamu transakéniho 
souboru. 

Neni-li klicové slovo WRITE zapsdno, zapise se zaznam na transakéni soubor ve. standardnim 
tvarut pole jsou ulozena ve stejném poradi, v jakém byla vkladdna, a tésné spolu sousedi (bez 
nezer mezi sebou). Standardni zéznam obsahuje jen vstupni pole (oznatend I nebo B v rubrice “UZiti" 
V prikazech pro popis poli). 
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Relace | 
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Valby 
oman nnenennnnnnwnenennnn! 
Uloha: 
CFILE EXITATR SHARE 
DATE JOBOPT SHARER 
EDITC PRIFILE STATUS 
ENTRATR SFILE TFILE 
EOJCTL 
Vstupni format: 
CLRL  SLNO 
EO) WRITE 


Taznamy Zapisovane na transakcn1 soubor obsahuji pouze data. Pri porizovani se nedopl fui 
automaticky zadne identi fikacni kody, ktereé by ukazovaly format pouzity pri vytvareni kazdého zaz- 
nanu. Prostredek pro identifikaci zaznami Ctenych z transakéniho souboru v rezimech kontrola (pre- 
ghougeni), zména a prepocet poskytuje prikaz pro prohlizeci format, ktery je jinak Nepovinny. 

Fouziti prikazu pro prohlizeci format vyZaduje, aby typy zaznand byly identifikovany v datech, 

ato jednotlivym znaky v uF! €itych pozicich. Zaznamy musi byt proto JiZ pred porizovanim navrzeny 


7 tak, aby potrebam prohlizeciho formatu vyhavovaly. 


V prikazu pro prohlizeci format zadavame jednak testovaci znak, podle néjz se testuje obsah 
yarnam a jednak pozici Zaznamu, v niz se tento obsah nachazi. Dale musime zadat identifikacni 
tod néktereho vstupniho formatu, podle néjz se precteny zaznam zobrazi. Mize to byt 1 jiny format 
nez ten, ktery byl pouzit k vytvoreni zaznamu. 

Jestlize se zadany testovaci znak shoduje se znakem v testované pozici prave precteneho zaz- 
nam, zobrazi s@ 2aznam podle zadaneho formatu. Jestlize se neshoduie, prejde se na daléi prikaz 
pro prohlizeci format. Nevyjde-li Zadny z testi specifikovanych v prikazech pro prohlizeci formaty, 
provedou se testy zadane v odpovidajicim prikazu pro vstupni format. KdyZ ami ty nevyjdou, zobrazi 
5 zaznam podle naposled pouziteho farnatu. 

Wezaddme-li v prikazu pro prohlizeci format Zadne testy, vyhovi mu nazdy zaznam; zadne testy 
se neprovade}i a zaznam se zobrazi podle zadaneho formatu. 

Testy se provadéji v poradi, v nemz jsou zapsany. Pokazde, kdy2 se z transak¢nino 
éte novy zaznam, testovani zacina prvnim zapsanym prikazen pro prohlizeci format. 

Rubriky, kter@ se pouzivaji v prikazech pro prohlizeci format, jsou vyznaceny jako nesrafovane 
fa obr, 4.4, 


ee oe a e. 


1 
| | Volby | 
Podminky oa ee Oe 


Uloha: 


eneeeeennneecnnn: DalSi format CFILE — EXITATR SHARE 


Testovaci znak (0-9, A0-Z9) DATE  JOBOPT SHARER 
Jeeeeeenee: 1 EDITC PRIFILE STATUS 
Relace ENTRATR SFILE TFILE 


| 
——— er EQJCTL 
| ] Vstupni format: | 
pozice CLRL SLNO 
#P0Snnnn| EQJ TE 
| 
| 
| 
| 


A qe 


iz_5) 


Do této rubriky mizeme zapsat poradove ¢islo prikazu. 


4.3.2 Fo 


Do téeto rubriky zapisSeme pismeno Z. 


i Format Volby | 
F J 


1-9,40-290 [poonnnnnnn amen 


Uloha: 
la jena Dal3i format CFILE EXITATR SHARE 
; (0-9,40-29) DATE JOBOPT SHARER 
Opakovani EDITC = PRTIFILE STATUS 
! 


(1-9,N) ENTRATR SFILE TFILE 
K zadani jednoho testu zaznamu, ktery byl prave precten z transakcniho souboru, vypinime rub- ICTs 
riky "Testovana pozice" (sloupce 23 az 30) a “Testovaci znak" (sloupce 35 az 37). Pozic: zadane 
ve tvaru #POS! az #POS8192 (pozice | az 8192 v zaznamu). Testovaci znak musi byt uzavren mez; dvena 
apostrofy. 

Jestlize potrebujyeme testovat dva znaky v zaznamu, mizeme k primarnimu fadku prikazu pro 
prohlizeci format pridat jesté sekundarni radek, ktery musi byt oznacen ve sloupci 22 pismenen A, 
Ten reprezentuje test na podminku, ktera je k podmince testované v primarnim fadku ve vztahu J 
(zn, Ze obé podminky musi byt splaény zaroven, aby se zaznam moh) zobrazit v zadanem formatu, Iden- 
tifikacni kod formatu se v tomto pripadé nezapisuje do primarniho radku, ale do sekundarnihc. Jinat Obsahuje-li zaznam znak 2 v pozici 45, pi je se 
se sekundarni Fadek vypliuje podle stejnych pravidel jako primarmi. i_k_ jeho. zobrazeni format_identifikovany_kodem Al 


Vstu f 
pozice or de CLR. SLND 
#P0Snnan EOS WRITE 

3 


Sa a EQICT! 


Jnéno 


Obsahuje-1 m znak 2 nebo znak 3 v pozici 45, 

Zije se k_jeho zobrazeni_format_identifikcvany kddem Al. 
V prikazech pro prohlizeci format znamena zépis v této rubrice "soucasny format". TZapisujene 
do ni tedy identifikacni kad toho vstupniho formatu, podle néjz se ma zobrazit prave precteny zaz- 
fam transak¢niho souboru. Nesmi to vsak byt kad, ktery byl zapsan v prikazu pro vstupni format 
5 klicovym slovem WRITE(#NO). Krome identifikacnich kodd definovanych v prikazech pro vstupni for- 
mat mize byt v téeto rubrice zapsana Cislice 0, ktera oznacuje tzv. format 0. Fornat 0 zobrazuje 
zaznam jako retézec jednoznakovych poli bez zvlastni Upravy. Klavesmice je pritom nastavena do 
pismenoveho premyku. 
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Tato stranka je prazdna umysiné 


Do formulate A se zapisuji tyto prikazy: 


Fikazy pro popis souboru. 
azy pro popis Zaznamu. 
azy pro popis pole. 
‘azy pro popis tabulky. 
azy pro konstantu. 


Souborem nazyvame nejen data na vstupnim/vystupnim zarizeni, ale i logickou cestu, ktera 
zprostfedkavava presun téchto dat mezi vstupnin/vystupnim zarizenim a programem a Fizeni vstup- 
nich/vjstupnich operaci. Pro kazdy soubor pouzity v programu musi byt zapsdn jeden prikaz pro 
popis souboru. Timto prikazem je soubor definovan. 

V programu mize byt definovan jen jeden soubor ‘na klavesnici a obrazovce. Ostatnich soubord 
adie oyt definovano neivyse 14. Tento potet vSak klesa, jestlize jsou v programu definovany nékte- 
ré druhy disketovych soubord: 

- Kaddy indexavany =cubor snizi maximdini pocet o 1. 

~ aidy vicedisketovy soubor, ktery je definovan tak, Ze pouziva nékolik disketovych jednotek, sni- 
ii saxinalni pocet o pocet téchto jednotek zmeneny o 1. 

Do maximalniho poctu se nezahrnuji orikazy pro popis souboru, kterymi jsou definovany prikompilova- 
ve talulky. 

Prikaz pro popis souboru musi byt zapsin pred prikazy pro popis zaznamu a prikazy pro popis 
poli {popr. labuiek}, které se « tomuto souboru vztahuji. 

fubriky, které se pouzivaji v prikazu pro popis souboru, jsou vyznateny jako neSrafované na 


= 


Dese‘ inna SUBST 
| mista | ARRATR EDTCDE PMT © SETOF TADD 
souboru/! =| AUXDUP ERROR RANGE SETON TSUE 
zaznanu/ AUXST EXSR  RANGET SHIFT XCHI 

0 COMP INSERT RESET SUB konstanta 


CHECK(AD AS BC BV BY DD DR FE Gx 
UC ME MF Mxx RB RL RZ) 


Do této rubriky mizeme zapsat poradove Cislo prikazu. 


5.1.2 Formula? (sloupec 6) 


Do této rubriky zapigeme jméno souboru. Jde-li o soubor transakEni, kopirovaci nebo tiskovy, 
musi to byt stejné jméno jako jméno zapsané v Odpovidajicim kli€ovém slové (TFILE, CFILE nebo 
PRIFILE) prikazu pro popis lohy ve formulari Z. 

Jméno zapsané v této rubrice je pouzito v ndvésti disketového souboru, neni-li zadano klicové 
slovo LABEL v rubrice "Dal5i funkce". 


Do této rubriky zapiseme délku fejvetSiho logického zéznamu. Zépis je povinny. Délka musi 
byt rovna souttu délek poli nebo mize byt vétSi. Do souctu seu soubord na klavesnici a obrazovce 
~ DEVICE(CRT) - zahrnuji pole vstupni a obousmérna (1 nebo B v rubrice "UZiti"). Delka zaznam 
tiskového souboru by méla byt rovna Sifce tiskového Fadku. Délkovy didaj musi byt zarovnan k pra- 
veldu ukraji rubriky. 

Maximalni délkovy ddaj je zavisly na typu zarizenis 


Disketa 8192 
Tiskarna 255 
Komunikace S12 


_ lato rubrika plati jen pro soubory na klavesnici a obrazovce - 
zapiSeme, slouzi jako standardni pro i 
vm zdroj dat, zobrazeni dat v 
Platne zapisy jsou tyto: 


ktery do ni 
Ovliviuje se 


VSechna pole souboru jsou vstupni, neni-li 


I " oe 
ae , Popisu zaznamu Ci pole stanoveno jinak. 

fi) VSechna pole souboru jsou vystupni, neni-li Fe } 

B 


Ws n Y popisu zaznamu ¢i pole stanoveno jinak. 

VSechna pole souboru jsou obousmerna, neni-li v popisu zdznamu €i pole stanoveno jinak. 

W VSechna pole souboru jsou Pracovni, neni-li v popisu zaznamu i pole stanoveno jinak. 
Pro pole v souboru neni zadéno zadné standardni uziti. 
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5,147 Dal3i_fur 


Do této rubriky zapiSeme kli€ova slova 5 odpovidajicimi parametry, jestlize je treba zadat dal- 
je tykajici se celého souboru. Platna klicova slova jsou tato: 


$1 dda 
kms  - zpisob seskupeni zaznami v paméti a na disketé (blocking and spanning), 
CHECK - kontrola Klavesového vstupu, 
DEVICE - typ pridavného zarizeni, 
ATR  - zobrazovaci atributy poli (display attributes), 
DSPSIZ - velikost obrazovky (display size), 
FORM - délka strankového formulae (form length), 
INDEX = jména indexoveho souboru, 
LABEL ~ jméno souboru na disketé, 
LOcoN = pripojovaci informace v komunikaci, 
WARK ~ chybova znacka (error mark), 
NENT = potet zaznami v souboru nebo polozek v tabulce (number of entries), 
MARK - znatka prezkouseni (verification mark). 


Pubrika "DalSi funkce" mize byt rozSifena pokratovacimi Fadky, je-li téeba dal$i misto pro za- 
pis. K tomu pouzijeme jen rubriky "FormulaF" a "Dalsi funkce”. 


BIKING ( #0BL ndvaznost ) 


Kligové slovo BLKING plati pouze pro disketové soubory. Udava zpiisob seskupeni zaznami v pa- 
neti ana disketé pri zapisu. 

Paranetr #DBL (double) znamena vyhrazeni dvou paméfovych oblasti pro vystup. Je-li parametr 
vynechan, dosadi se standardni udaj: dvé pamétové oblasti pro transakcni soubory a pro klicove 
soubory, U nich jsou pouzity operace WRITE a UPDAT ve formulari C. Pro ostatni soubory je stan- 
dardni jedna Sectivd ablast. 

Parametr "navaznost" uréuje zpisob blokovani a navaznosti zaznami na disketé. Platné zapisy 
Jsou tyto: 


FMT ~ Nebiokované a nenavazujici zaznamy (unblocked, unspanned), tj. zakladni vymena 
nebo vyména typu H. Kazdy zaznam zacind na zacatku sektoru a je dlouhy nanejvys 
jako sektar (nepresahuje hranice sektoru). 

FMS ~ Blokované a navazujici zaznamy (blocked, spanned), t}. vyména typu I. Zaznamy jsou 
ulozeny souvisle bez ohledu na hranice sektord. 


Standardni hodnota tohoto parametru je *FMTS, protoze blokované a navazujici zaznamy vyuzivaji mi- 
slo na diste!é Usporndji. 
0 forwatu zéznamd se pojednava podrobnéji v kap. 12. 


CHECK ( DD } 


, Kligove Slovo CHECK znamena kontrolu klavesového vstupu. Parametr DD (duplication disable o 
inne Guplikaci) je jediny, ktery mize byt pouzit na urovni popisu souboru. Zakazuje pouziti 
‘2vesy DUP pri zpracovani zaznami tohoto souboru. 


DEVICE ( zaFizeni adresa ) 
ee slovo DEVICE pridéluje souboru vstupni/vystupni zarizeni. Jeho zapis je povinny ve 
Prikazech pro popis souboru kromé téch, které jsou spjaty s prikompilovanymi tabulkami. 


Par "Zar izeni" rt 3 r : AEH B Woah 
sranetr "zarizeni* uréuje typ vstupniho/vystupniho zarizeni. Platné zapisy paranetru  "zari- 


eni" jsu tytos 


Formular A 5-3 


COMM ~ kowunikacni spoj (communication line), 
CRT - klavesnice a obrazovka (cathode ray tube), 
DISK - disketova jednotka, 

PRINTER  - tiskarna. 


Parametr “adresa" slouzi k rozligeni nékolika zarizeni stejneho typu. Plati tedy jen pro za- 
Fizeni DISK a PRINTER. Mize byt zapsin jednim ze dvou zpisobi: 


~ dvouznakovy logicky identifikator definovany pri konfiguraci systému (napr. D1, D2 apod.), 
~ Cly?znakavy kod fyzického zarizeni vyjédieny ve tvaru X'nnnn!, kde nnn jsou ctyFi hexadecindlni 
Cislice urcené fyzickému zarizeni pevné (napr. X'4000', X'4400' apod.). 


Je-li zadéno kligové slovo JOBOPT(#NOPMT) v prikazu pro specifikaci ulohy na formulari Z, je para- 
metr "adresa" povinny; jinak je nepovinny. 

Pro vicedisketove (vicedilné) soubory je treba zadat nékolik parametrd "adresa", nejvyse véak 
osm. Potet téchto parametrd znamend potet dilt (disketovych kotoucd), které maji byt zpracovany 
jako jeden soubor. Sekvencni vicedilny soubor mize byt zpracovan na jediné disketove jednotce. V tom 
pripadé musi byt zapsna téz adresa dvakrét. Na uréené jednotce mize byt zpracovano az 99 dild. 

Diskelove soubory urcené k porizovani dat (TILE, SFILE, CFILE) a tabulkové soubory nemohou 
byt vicedfIné. 

Poznamka: Priddvani dalgich zaznaml k vicedilnému souboru zacind na prvnim z dild, ktery je 
aznaten jako posledni (pismenem L v pozici pro indikator vicedilnych soubor’ v navésti souboru). Je- 
1i soubor otevirdn jako ryze vystupni, jsou vSechny dily predbezné oznaceny jako posledni (pisme- 
nem Lv navesti). 


DSPATR ( atributy ) 


Kliové slovo DSPATR (display attributes - zobrazovaci atributy) plati jen pro soubory na klé- 
vesnici a obrazovce ~ DEVICE(CRT) - a urcuje zobrazovaci atributy vSech poli v souboru. Platné zapi- 
sy pro atributy jsou tyto: 

| ORR ore eer; {usa ste S eee 
[ Atribut | Vyznam | 
f BL Zobrazeny zaznam blixa - zhasin a rozsvéci se (blink). 
ts Mezi znakovymi pozicemi se zobrazi oddélovate - 
~ tenké svislé cary, které neomezuji kapacitu 
obrazovky (column separators). 
Tobrazené znaky zaFi zvySenau intenzitou (highlight). 
Pole v zaznamu se nezobrazuji (not displayed). 
Pole v zaznamu se zobrazuji inverzné - tmavé 


Kazda znakova pozice y polich zaznamu se podtrhne 
(underline). 


ae 


| znaky na sviticim podkladé (reversed images). | 


Kombinace HI RI UL je chybna; zaznamy se nezobrazuji. 


DSPSIZ ( Fadky sloupce ) 


Riigove slovo DSPSIZ (display size = velikost obrazovky) urcuje nejvetsSi rozmér obrazovky, 
ktery mize byt pouzit pri vypactu. Plati Jen pro soubory na klavesnici a obrazovce a je nepovin- 
ne. Je-li ySak Zapsano, jsou oba Parametry povinne, 

Platné zdpisy parametrd jsou tytos 
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| Radky | Sloupce Vyznam | 

oad i ee ee 
6 80 Obrazovka pojme 480 znakéi 
12 80 Obrazovka pojme 960 znakd 

| 24 | 80 | Obrazovka pojae 1 


a a ae 


Neni-li kligové slovo DSPSIZ zadano, rozumi se 480znakova obrazovka. 


FORK ( délka konec indikator ) 


Kligové slovo FORM (form length - délka tiskového formulare) plati pouze pro tiskové saubory 
~ DEVICE(PRINTER). Umoziuje organizovat tisténa data do stranek. Neplati vsak pro tiskové saubory 
spojené s klicovym slovem PRTFILE v prikazu pro specifikaci Glohy na formulari Z. 

Parametr “délka" je povinny, udava celkovou délku stranky v poctu Fadkd. Swi byt v rozsahu od 
a ay "konec" je nepovinny, udava cislo fadku, ktery se povazuje za logicky ikonec stranky 
(tj. konec jejiho uzitecného prostoru). Jestlize tisk miji tento Fadek a nebyl zadan treti param 
wetr, je stranka naplnéna a papir se automaticky posune na prvni radek dalsi stranky. Cislo fadku 
sni byt v rozsahu od { do hodnoty parametru “délka". anisau ; 

Parametr “indikdtor" je nepovinny, predstavuje indikator konce stranky. Mize byt zadan jen z- 
roves druhym parametrem. Platné zapisy jsou cisla indikatord 01 az 99. Indikator se Zapne, jest- 
lige tisk miji radek predstavujici logicky konec stranky; k automatickému posuvu na za¢dtek daléi 
stranky nedojde. Indikator konce stranky vsak zistane stale zapnuty, nevypne-li je) vhodny prikaz 
programu.Tento mechanismus dovoluje tisknout soucty na konci stranky a hlavicky na zacatku dalsi 
stranky. 

Weni-li pra tiskovy soubor kliové slovo FORM zadano, je standardni délka stranky 72 radkd 
a logicky konec stranky je na 61. radku. Nepouziva se Zadny indikator konce stranky. 

Jeli ‘1i€ové slovo FORM zapsano jen s parametrem "délka", nezjistuje se konec stranky auto- 
naticky, ale musi je Stovat program (¢itdnim fadkd). 


INDEX ( pamé{ soubor } 


Kligové slovo INDEX plati jen pro disketové soubory. Uréuje organizaci a zpiisob zpracovani 
soubord, které se étou nebo zapisuji prostrednictvim prikazi formulare C. Pouziva se, jestlize: 
> vSechny zaznamy v souboru maji klicove pole stejné délky ana stejném misté, nebo 03 1) 
> zdznany v souboru nemaji Zédné klicove pole, ale existuje soubor (adresni index) obsahujici Uda- 

je pualore zaznam) (adresy). Tento soubor mize vzniknout jako vystup tFidiciho programu (adres- 
1 vystup),. 
Podrobnéji se a indexech pojednava v kap. 12. . 

Paranetr "panei" je nepovinny a znamena pocet indexavych polozek (klicd), které budou umist2- 
‘YY pameli jakozZto index druhé urovné. Smi byt zapsano Cislo od 2 do 32767. Parametr “pamet” ne- 
plati pro adresni indexy. Index druhé urovné je automaticky vytvaren a udrzovan tak, aby zvysil 
Tychlost pristupu k zaznamin, Maji-li zaznamy klicové pole a parametr “pamat" neni zadan, je jeho 
standardni hodnota 5. 

Parametr "soubor" je nepovinny. Je-li zapsdn, musi to byt jméno indexového souboru s klici 
nebovadresniho indexavého souboru. Juéno mize byt zapsano stejné jako v navésti souboru (viz klico- 
8 slovo LABEL sfikazu pro Papis souboru). Indexovy soubor nemiize byt definovan jinde v programu. 

Jestlize zaznamy v souboru maji kligové pole a prikaz pro popis souboru neobsahuje klicove 
slova INDEX, nebo, je obsahuje, ale bez parametru "soubor", ma se za to, ze zdznamy jsou v souboru 
Serazany) vzestupné podle klige. Pri zapisu zdznamu s klicem, ktery podle velikosti patri mez. dva 
®iistujici zéznany, se zéznam vlo3i na toto misto a nasledujici zdznamy se posunou o jedno misto 
% 0 neplatny zéznam nebo konec dat. : 

Jom sli#®. zéznany v souboru maji kliové pole av prikazu pro popis souboru je zapsano klicove 
Slovo INDEX s paramet ram "soubor", pouziva se pro pristup k zaznamim indexovy soubor s klici. V da- 
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toveém souboru jsou zdznamy serazeny tak, jak byly postupné pripisovany (vidy na konec), a indexove 
zaznamy (polozky) jsou sefazeny vzestupné podle klice. Indexove zaznamy se skladaji z klicového po- 
le a Udaje o umisténi zaznamu v souboru. Pri zdpisu nového zaznamu do souboru vzniknou dva zazna- 
my: datovy zaznam pridany na konec dat a indexovy zaznam vlozeny na spravné misto do indexovéhg 
souboru podle velikosti klice. 

Adresa zarizeni pro indexavy soubor je taz jako adresa_ zarizeni pro datovy soubor (paranety 
“adresa" klicavého slova DEVICE). U vicedilnych soubord je to adresa zarizeni, na neni je unistin 
prvni dil souboru. 


LABEL ( jméno ) 


Kliove slovo LABEL (abe) - navéSti) je nepovinné. Plati jen pro disketové soubory a unozhuje 
Specifikovat jméno zapsané v navé5ti souboru, jestlize se 1isi od toho, které je zapsano v rubrice 
"Jméno". Parametr je povinny. 

Je-li typ vymény dat 1, mi parametr "jméno" tvar 


hhhhhhhh 
nebo 
#vvvvvv. hhhhhhhh 


kde hhhhhhhh znamena nejvySe osmiznakové jméno souboru z ndvésti HDR1 a vwvvw nejvySe Sestiznako- 
vé jméno z navest{ VOL1, napr. LABEL(*DATAO1.MATERIAL). 

Jméno mize byt na zacdtku vypoctu zménéno, neni-li zadano kligové slovo JOBOPT(#NOPMT) v pri- 
kazu pro specifikaci dlohy. 


LOGON ( parametr ) 


Kli€ové slovo LOGON plati jen pro komunikacni soubor - DEVICE(COMM). Urcuje pFihlagovaci in- 
formaci, které se ma poslat hostitelskému systému pri otevirani souboru. Parametr je povinny a adie 
byt zaddn bud jako xonstanta uzaviend v apostrofech nebo jako jméno pole, které obsahuje prihlago- 
vaci informaci. Maximdlni délka tohoto pole je 80 znaki. 


MARK ¢ #20Sn ) 


___ Kif€ové slovo MARK (error mark - Chybové znacka) plati jen pro transakéni soubor a urCuje po- 
zici v zaznamu, do niz se zapige znacka chyby (pismeno E - error), pouzije-1i operator pri vkladani 
dat klavesovou funkci “oznaceni pole" a dava tak najevo, Ze zdznam obsahuje chybna data. V prvni 
pozici takto oznateného pole se na obrazovce zobrazi systemovy indikdtor. Znacka E zistava na diske- 
tovém zaznamu, dokud neni dmyslné prepsdna nebo vymazéna pri prezkougeni. 

Parametr je povinny a ma tvar 3P0Sn, kde-n je Eislo pozice v rozsahu od 1 do délky zaznamu. 


NUMENT ( potet ) 


y uréuje parametr “poget" pocet polozek 
ouboru (na disket® nebo v programu) néko- 
Jde-1i 0 vystupni 
zeni mista) 
jiz predem al 


urcuje parametr "potet* pocet zdznami pro alokaci (vyhra~ 
Alokace se provede v dobé otevirani souboru. Je-1i soubor 


yank ( 4P05n ) 


igove slovo VMARK (verification mark - znacha prezkouSeni) plati jen pro transak¢ni soubor 
a ci y zaznamu, do niz se zapiSe znacka piezxouSeni (pismeno V - verified), byl-li zaz- 
uje 


pi: kougen (v rezimu kontrola). Znacha V se odstrani, jestlize je zdznam prepsan v rezimu zme- 
nan prez! 


a 


Paranetr je povinny a ma tvar #P0Sn, kde n je Cislo pozice v rozsahu od 1 do délky zaznamu, 


[roserenneemenagomennnonyayonnnn a a a 
1 Iodikator oe 
{OPECK,ERROR)| Typ Uziti 
jmena eeeeaT 

Desetinna 

ARRATR EDTCDE PMT SETOF TADD 

ee AUXDUP ERROR RANGE SETON TSUB 

AUXST EXSR = RANGET SHIFT XCHK 
| | COMP INSERT RESET SUB konstanta 


mista 
Ba 


eae DSPATR LOOK SEQ SUBST 


BjRa-[S1.] 
[Deka] | [9]WJdek] | CHECK(AD AS BC BV BY DD DR FE Gxx + 
LC ME MF Mxx RB RL RZ) 


$i_pouzitelnd kapacita obrazovky je 


(aay 
I | 
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Prikaz pro popis zaznamu pojmenovava zdznam a popisuje charakteristiky vztahujici se k cele 
mu zaznamu. 

VSem prikazdm pro popis zaznam, které patri k jednomu souboru, musi predchazet prikaz pro 
popis tohoto souboru, Za prikazem pro popis z4znamu musi nas}edovat vSechny prikazy pro Popis poli, 
pokud jsou vibec pouzity. 

Nejvelsi pocet 
pro ostatni soubory. 

Rubriky, které se pouzivaji v prikazu pro popis zaznamu, jsou vyzrateny jaku nesrafovag 
na obr. 5.2. 


Indikator 
(CHECK, ERROR) Typ Ziti 
| 


fikazé pro popis zéznamu je 128 pro soubory na klavesnici a obrazovee a 127 


mena 


DSPATR LOOK SEG 
EDTCDE PMT — SETOF 


sandal | 


mista | 
ee | AUXDUP. ERROR RANGE SETON i 

Typ dat] | ST EXSR  RANGET SHIT NoHY 
INSERT RESET SUB konstanta 
| 


CHECK(AD AS BC BY BY DD OR FE Sux + 
LC ME MF Mxx RB BL RZ) 


5.2.1 Poradi (sloupce 1 az 5) 


Do této rubriky mizene zapsat poradové cislo prikazu. 


3.2.2 Formulary WY (sloupec 4) 


Do této rubriky zapigene pismeno A, 


5.2.3 Typ juéna (sloupec 17) 


Do této rubriky zapigeme pismeno R. 
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5,204 Inéno_(sloupce 19 az 26) 


fo této rubriky zapiSeme jméno zaznanu. 


5,25 Délka (sloupce 30 ai 34) 


Tato rubrika plati jen pro komunikatni soubory - DEVICE(COMM). Zapisujeme do ni délku zézna- 
tw prenageného zapisovou operaci WRITE. Délka musi byt menSi nebo vovna délce uvedené y prikazu 


pro popis si souboru, 3 
(statni soubory pouziva)i délkoveho Udaje z prikazu pro popis souboru. 


Tato rubrika plati jen pro soubory na kldvesnici a obrazovce - DEVICE(CRT). Udaj, ktery do ni 
slouzi jako standardni pro god7izené popisy poli. Ovlivfuje volbu zdroje dat, zobrazeni 
i dat do zaznamu. 
ys tyto: 


VEechra pole zéznamu jsou vstupni, neni-li _Y popisu pole stanoveno jinak. 
V5echna pole zaznamu jsou vystupel, neni-li v popisu pole stanoveno jinak. 
VSechna pole zézaamu jsou obousnér: nay neni “li v popisu pole stanoveno Aus 
Vechna pol 

Pro pole ¥ zaznamu neni 


funkce (slot 


Do f8to rudsity zariseme kligova slova s odpovidajicimi parametry, jestlize je teba zadat dal- 
gy Udaje \ykajici se celého zaznam.. Platna kli€ova slova jsou tato: 


CHEEK = kontrola Kiavesového vstupu, 

DSPATR iatributy poli (display attributes), 
RECID identifikace zaznamu (record identification), 
Serr y indikatoru (set off), 

SETON zapnuti incikatoru (set on), 

SKIPA skok po tisku (skip after), 

SKIPB_- skok pred tiskem (skip before), 

SPACEA - posuy po tisku (space after), 

SPACEB - posuv pred tiskem (space before). 


Rubrika "Dali funkce" mize byt rozSizena pokracovacimi Fadky, je-li treba dalSi misto pro 
zapis. K tomu Pouzijeme jen rubriky "Formula" a "Dali funkce". 


CEC ( DD ) 


Kigové slovo CHECK (check - kontrola) znamend kontrolu klavesavého vstupu. Parametr DD (dup- 
i 100 disable - Znemoznit duplikaci) je jediny, ktery mize byt pouzit na Urovni popisu zaznamu. 
MAZE pouzity kKlavesy DUP pri zpracovani tohoto zaznamu. 


licati 
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DSPATR { stributy ) 


iGuvé slovo DSPATR ‘display attributes - zobrazovaci atributy) plati jen pro soubory na kli- 
yesnici 3 odrazovce a urcuje zobrazovaci atributy vsech poli v zaznamu. Tyto atributy se konbinu}i 
»atributy zadanymi v prikazu pro popis souboru (byly-li zadany) a vytvareji tak zpsob Zobrazenj 
vSech poli v zéenamu, 
Plato zapisy pro alributy jsou tyta: 


En —— 


Atribut T Vyznaa 
BL Zobrazeny zaznam blikd - zhasind a rozsvéci se (blink). 
Mezi znakovymi pozicemi se zobrazi oddélovace - 
- tenké svislé Cary, které neomezuji kapacitu 
| obrazovky (column separators). 


Tobrazené znaky zari zvySenou intenzitou (highlight). 
Pole v zaznamu se nezobrazuji (not displayed). 
Pole v zaznamu se zobrazuji inverzné - tmave 

znaky na sviticim podkladé (reversed images). 
Kaida znakova pozice v polich zaznamu se podtrhne 


(underline). 
es | 


Kombinace HI RI UL je chybna. Je-li tato kombinace'zapsana, nebo vznikne-li kombinaci s atri- 
buty zadanymi v prikazu pro popis souboru, zaznam se nezobrazi. 


RECID { #P0Sn 'z' ) 


Kli€ové slovo RECID (record identification) plati pro vstupni zaznamy yvsech soubor’ krosé 
transakéniho souboru a krom souboru na klavesnici a obrazovce. Dovoluje ur€it identifikacni znak 
a jeho pozici v zaznamu, aby program moh] zjistit, jaky typ zéznamu precetl. Schopnost identi fiko- 
vat zaznam je uziteCnd pri Cteni zdznami operacemi zapsanymi ve formulari C. 

Kligové slovo RECID smi byt zapsdno v jednom prikazu nékolikrat. 

Prvni parametr ma tvar #P0Sn, kde n je Cislo pozice v rozsahu od 1 do délky zaznamu. 

Druhy pavametr je jediny znak uzavfeny v apostrofech ("z" predstavuje libovolny znak). 

Bali podrobnosti o pouziti klicového slova RECID jsou uvedeny v popisu  kli€ovych slov SETON 
a SETOF a v popisu Etecich operaci formulare C v kap. 4, 


SETOF ( indikator ) 
SETON ¢ indikdtor ) 


Kliova iSslova SETOF (set off - vypnout) a SETON (set on - zapnout) plati pro zaznamy vSech 
soubor’ krone kldvesnice a obrazovky a kromé transakeniho souboru. (Pro klavesnici a obrazovku 
a pro transakéni soubor wohou byt zapsina jen v piikazech pro popis poli.) Klicova slova SETOF 
a SETON se pouzivaji ve spujeni s klicovym slovem RECID k identifikaci typu precteného zaznamu. 
UCinek t2ch'o kiigovych slov zévisi na poradi, v némz jsou zapsana. 

Parametr “indikator” je povinny a musi byt zapsan jako dvouciferné ¢islo indikatoru od 01 do 


iv. 
N zaps iCovym slovem RECID a byl-li precten zaznam typu zada- 
i€ovén sl . indikator zadany v klicovém slové SETON se zapne. 5 
Jeli k}itové slovo SETON zapséno pied kligovym slovem RECID, indikdtor se zapne jesté pred 
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‘estovdoim preétenho zaznamu a vysledek testu uz nema na indikator vliv. 
3 Indikator mize byt testovan v operacich formuldre C a uréovat tak, které Operace se maji pro- 
vésl ra tonto zaznamu. 


IPA ( fadek ) 


Kifgové slovo SKIPA (skip after - skok po) plati jen pro tiskové soubory a urcuje Fadek, 
na ktery se nastavi tiskovy mechanismus po tisku zaznamu (Fadku), 

Parasetr “rédek" urcuje Cislo radku na strance v rozsahu od 1 do délky stranky (prvni para- 
tele Kiiavého slova FORM z prixazu pro popis souboru). 


SK1B ( Fadek } 


Slitové slovo SKIPE (skip before - skok pred) plati jen pro tiskové soubory a urcuje Fadek, 
na ktery se nastavi tiskovy mechanismus pred tiskem zaznamu (F4dku), 

Paranetr “rédek" urCuje Cislo Fédku na strance v rozsahu od 1 do délky stranky (prvni parametr 
iigoveho slova FORM z prikazu pro popis souboru), 


SPAEA ( potel ) 


Ktiové slovo SPACEA (space after - posuv po) plati jen pro tiskové soubory a urcuje potet 
fadkl, o “tery se posune papir pod tiskovym mechanismem po tisku zaznamu (Fadku). 

Parametr "pocet" uréuje potet posuvi v rozsahu ad 0 do 3. Potet 0 potlaéuje posuv, takze na 
jednoa rédku Ize vytisknout dva zaznamy. 

Neni-li_ kliové slovo SPACEA zapsdno a nejsou-li zapsdna ani kli€ova slova SPACEB, SKIPA, 
SFB, posune se papir automaticky o 1 fadek po tisku kazdého zéznamu. 


SPACER ( pofet ) 
_,. Klitové slovo SPACEB (space before - posuv pred) plati Jen pro tiskové soubory a urcuje pocet 
Fadkd, 0 ktery se posune papi pod tiskovym mechanismem pred tiskem zaznamu (Fadku). 


Paranetr “potet” ur€uje potet posuvd v rozsahu od 1 do 3. 
Heni-li Kigové slovo SPACER zapsano, papir se pred tiskem neposune. 
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A 


A 
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Obr. 5.4 


Dal5i funkce | 


peeranimenee 


ADD DSPATR LOOK SEQ Syggy 
ARRATR EDTCDE PMT SETOF Tapp 
AUXDUP ERROR RANGE SETON SUB 
AUXST EXSR  RANGET SHIFT CHK 
COMP INSERT RESET SUB konstantal 


CHECK(AD AS BC BV BY DD DR FE Gxx +| 
LC ME MF Mxx RB RL RZ) 


5.3 Prikas 


Prikazy pro popis poli popisuji pole nebo tabulkové polozky, které jsou soucasti zaznamu. PRi- 
yazim pro popis poli musi predchazet prikaz pro popis zaznamu. 
Prikazy pro popis poli mohou byt pouzity k popisu téchto objektt: 


~ pepojnenavané pele (rubrixa "Jméno” je prazdna a rubrika "Délka" je vyplnéna), 
- pajnenované pole s definici (rubriky “Jméno" a “Délka" jsou vyplneny), 

- odkaz na pole (rubrika “Jméno" je vyplnéna a rubrika "Délka" je prazdnd), 

= odkaz na tabulku (rubrika “Jwéno" je vypinéna a rubrika "Délka" je prazdna). 


Odkaz na tabulku predstavuje souhra nékolika tabulkovych polozek (poli). Prikaz s odkazem na 
tabuléu je rovnocenny nékolika prikazim s popisem pole (jednomi pro kaZdou tabulkovou polozku). Ma- 
de byt poudit be specifikaci funkci vstupu/vystupu nebo klavesnice a obrazovky pro nékolik datovych 
polozek. Pocet tabulkovych polozek pouzitych v odkazu na tabulku mize byt dlize urcen (omezen) kli- 
covym slavem ARRATR. 

Délka a potet desetinnych mist kazdé tabulkové polozky se zadavaji v prikazu pro popis tabulky. 
Rubrika "DalSi funkce" se uplatai pro kazZdou tabulkovou polozku nezavisle. 

Nazev "pole" mize v této podkapitole znamenat také tabulkovou polozku (prvek) nebo odkaz na 
fabulku. 

Rubriky, které se pouzivaji v prikazu pro popis pole, jsou vyzna¢eny jako neSrafované na ob- 
razku 5.5, 


Apr ean n een a ne nnenennnnnnenm meme ning 


] DalSi funkce | 


ARRATR EDTCDE PMT © SETOF TADD 


| ADD  DSPATR LOOK SEQ = SUBST 


| 

jeenymmnd AUXDUP ERROR RANGE SETON TSUB | 

| AUXST EXSR RANGET SHIFT XCHK | 

pole/ | COMP INSERT RESET SUB ied 
tabulky Sl. 

Pora-[Als é | CHECK(AD AS BC BV BY DD DR FE Gyx +f 

di | LC ME MF Mxx RB RL RZ) ] 

7 8} 

| 


Do této rubriky mizene Zapsat poradové Cislo prikazu. 
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Do této rubriky zapigeme pismeno A. 


5.3.3 Indikator (sloupce 9 a 10) 


Tato rubrika plati pouze v sekundarnim Fadku prikazu Pro popis pole u souboru na klavesnicj 
a obrazovce, a to jen.tehdy, je-li pouzito funkce mijeni pole (BY) nebo mijeni pole pri prezkou- 
Seni (BV) v kligovém slové CHECK nebo kKIigového slova ERROR. Daléi informace o pouziti rubriky 
"Indikator" jsou uvedeny v popisu klidovych slov CHECK a ERROR. 


5.3.4 Typ_jména (sloupec_17) 


Tato rubrika zistava vétSinou prazdnd. Jedinou vyjimkou je popis kliéového pole disketového 
souboru, kdy se do ni zapisuje pismeno K. V zéznamu mize byt takto oznateno jen jedno pole. Klito- 
vé pole mize byt definovano jen u disketovych soubor’, které nejsou transakéni ani kopirovaci. 


5.3.5 Jnéno (sloupce 19 a¥ 24) 


Tato rubrika mize zdstat nevyplnéna, jestlize se obsah pole v programu nepouziva. Pole musi byt 
Pojmenovano v téchto pFipadech: 


~ Ma-1i byt ménéno pofadi poli pri zépisu zaznamu na transak€ni soubor, musi byt pojmenovana vSechna 
vstupni pole (ta, kterd jsou oznacena I nebo B y rubrice "Uziti"), 

- Jeli pole pauzito ve vypocetni nebo Jiné operaci, wusi byt pojmenavano. 

~ Jestlize se na pole odkazuje jako na zdroj dat pro pomocnou duplikaci, musi byt pole pojmenovana. 


Verubrice “Jméno” wohou byt zapsina rezervovana slova UDATE, #T0Tn a #STATn. Slova UDATE a 
SSTATh jsou Platna jen jako vystupni pole; jejich obsah nemize byt modifikovan. Rezervovand slova 
)sou predem definovana. Je-li u nich zapsana délka v rubrice "Délka", musi byt shodnd s definava- 
nou déikou. Délky odpovidajici rezervovanym slovim jsou uvedeny v odst. 3.2.2 a v kap. 9. 

, Vrubrice “"Jméno" wie byt zapsano také rezervované slovo #RTN, které plati jen v souboru na 
klavesnici a obrazovce a které urcuje skupinu klavesovych funkci pro obrazovkovy format jako celek, 
nezavisle na Polich. Je-li v rubrice "Jméno" Zapséno rezervované slovo #RTN (routine - podprogram), 
musi zistat ostatn) rubriky, kromé rubriky "Dalsi funkce", prazdné. V rubrice "DalSi funkce" snéji 
byt pak zapsana jen klitova slova RESET, SETON, SETOF a EXSR se svymi parametry. 


5.3.6 Délka (sloupce 30 


_ ¥ této rubrice definu 
pon jednou s tidajem délky. 
Kazdé nepojmenavané pole (s prazdnou rubrikou "Jméno") musi mit vyplnénou rubriku "Délka”. 

Pojmenovana pole (s vyplnénou rubrikou "Jméno") mohou byt definovana se zapisem délky v rub- 


jeme délku pole. Kazdé pole definované v programy musi byt popsana ales- 


rice "Délka" jen jednou. Je-li délka u Stejné pojmenovaného pole zapséna nékolikrat, musi byt po-. 


kazdé stejna. 

ae v rubrice "Inéno" zapsano jméno tabulky, musi zistat rubrika "Délka" prazdna. 
* aniays pole mohou byt dlouha 1 aZ 256 pozic. Délka znakového kligového pole smi byt 1 az 28 
Wee (numerickd) pole, kleré 1ze pouzit y aritmetickych operacich, mohou byt dlouhd 1 af 


Délkovy Gdaj musi byt zarovnan k pravém okraji rubriky. 
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5,3.7 Typ dat. 


lapis v teto_ rubrice (kromé B a P) plati jen pro soubory na klavesnici a obrazovce a urcuje 
typ dat, kterd sméji byt obsazZena ve vstupnia poli (se zapisem I nebo B v rubrice “Uziti"), 
Tinisy BaP definuji prevod dat mezi vnitfnim tvarem (v operacni paméti) a vnéjSim tvarem 
{na ystupnia/vystupnim zarizeni) béhem operace vstupu/vystupu. Jde o tato zarizeni (kligové slovo 


DEVICE): 


- COM tkomunikacni linka), 
~ DISK vyjma SFILE a TFILE (disketa). 


Lipisy B a P nejsou povoleny v odkazu na tabulku. 
Platné zapisy v rubrice "Typ dat" jsou tyto: 


Abecedni premyk. Je povoleno vkladat vSechny znaky. Klavesnice je nastavena v premyku, ktery 
wmozfuje vkladat dolni znaky na kaZdé klavese. Operator mize toto nastaveni zménit premykaci 
‘lavesou. 
Binient data. Béhem vstupu se data prevadéji z binarniho tvaru v doplikavém kadu do zonového 
dekadického tvaru. Eehem vystupu se data prevadéji ze zdnového dekadickeho tvaru do binarniho 
tvaru v doplfhovem kddu. Délka bindrniho tvaru dat je urcena zapisem délky v rubrice "Délka". 
Pole c3lky 4 nebo kratSi se prevadéji do dvou slabik binarnich dat. Pole delky 5 az 9 se pre- 
vadeji do Cty slabik binarnich dat. VétSi délka pole neni pripustnd. (Viz téz kap. 10.) 
Thakov. rola (character check). Viastnosti jednotlivych znaki pole jsou uréeny parametren 
kli€ového slova SHIFT, které je v tomto pripadé povinné. : 
cistice (digits only). Do pole mohou byt vlozeny jen dislice 0 az 9. Neni nutné pouzivat 
i t}avesy. Zapornd Cisla se zobrazuji se znaménkem nad posledni Cislici (oznatujici 


slice. Kaida znakové pozice vyZaduje dva klavesové dhozy. Lze pouzit jen klaves 
s tislicesi 0 a2 9 a s pismeny A az F. Neni nutnd pouzivat zddné premykaci klavesy. 
Ciselay tnumericky) premyk. Je povoleno vkiddat vSechny znaky. Klavesnice je nastavena do dol- 
niha premyku u klavesnice pro psaci stroj a do horniho premyku u klavesnice pro ystup dat. Ope- 
rator mize toto aastaveni zménit premykaci klavesou. 
ThuSténs detadickd data (packed decimal data). Béhem vstupu se data prevadéji ze zhusténého do 
zinavého dekadického tvaru. Béhem vystunu se data prevadéji ze zdnového do zhusténého dekadic- 
iho tvaru. Délka zhuSténych dat je urCena zapisem délky v rubrice "Délka" podle tohoto vzorce: 


d= {D/2) + 1 


kde d je délka zhuSténého dekadického tvaru a D je délka zonového dekadického tvaru (z rubriky 
"Délka"). Zbytek po déleni dvama se zanedbava. (Viz tez kap. 10.) 
fisto se znanénkem (signed numeric data). Do pole mohou byt vlozeny jen znaky 0 az 9. Obsah po- 
le ai byt zarovnin voravo s vyplnénim levého konce mezerami. P7i vkladani dat je vyzZadovano 
Opusténi pole. K tomu ddelu musi operator stisknout kl4vesu POLE+ nebo POLE-, ktera zpisobi za- 
fovedni vpravo a doplni spravné znaménko. Stiskne-li operator x opusténi pole klavesu POLE KROK 
nebo VSTUP/BLOK KROK, data se nezarovnaji a znaménko se nedoplni. Kladné hodnoty se ukoncuji 
"lavesou POLE+, zdporné kldvesou POLE-, Pii vkladani Cislic 0 az 9 neni nutné pouzivat premy- 
hact Klavesy, 

Na obrazovce je pro znaménko vyhrazena jedna pozice navic, a to vpravo od udaje v poli. 
Sladné zraménko je p¥edstavovaro mezerou, zéporné znaménko je predstavovano znakem - (minus). 

wa diskel® je kladné znaménko predstavovano hexadecimalni cislici F v zoné u cislice nej- 
azsiho Fédu, zéporné znaménko hexadecimalni cislici D v téze zén. 
Rezervavano pro specisini pouziti. 
Reze-vovano pro specidini pouziti. 
teh abecedni znaky. Do pole mohou byt vlozena jen velka pismena, carka, tecka, pomlcka a meze- 
fa. Klavesnice je nastavena na dolni znaky klaves. Operator mize toto nastaveni zménit premy- 
Kaci klavesou, 
Jen Ciseln’ znaky. Do pole mohou byt vlozeny jen znaky 0 az 9, carka, tecka, plus, minus a me- 
zea. Klavesnice je nastavena do dolniho premyku u klavesnice pro psaci stroj a do horniho pre- 
ayku U klavesnice pro vstup dat. . 
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Je-li zaps v rubrice "Typ dat" vynechan, dosadi se A u znakovych poli a Nu Ciselnych poli, 


Poznamks: Tvar, v némz se zobrazuji data typu D, N, Sa Y, je popsan u funkce "Opusténi pole 
se zapornym znaménkew” v kap. 9. 


istoupec_37) 


Tapis v této rubrice je platny jen tehdy, je-li vyplnéna rubrika * élka". Urcuje, ze pole je 
selné (numerické) a ze ma stanoveny pocet desetinnych mist, tj. pocet cislic vpravo od desetin~ 
né tecky (nebo Carky). Povolené zapisy jsou 0 az 9. Zdstane-li rubrika nevyplnéna, je pole znakové, 


5.3.9 Uz 


Tato rubrika plati jen pro soubory na klavesnici a obrazovce - DEVICE(CRT). Ovliviuje volt 
zdroje dat, zobrazeni dat v polich a sestaveni dat do zaznamu v transakcnim souboru. 
Platne zapisy jsou tyto: 


Vstupni pole (input field). 
0 Vystupni pole (output field). 
B Obcusmérné pole (both input and output field). 
Ww Pracovni pole (work field). 
Mezera Dosadi se udaj z rubriky “Uziti" z prikazu pro popis zaznamu; je-li prazdny, pak z pri- 
kazu pro popis souboru; je-li i ten prazdny, dosadi se I. 


Vstupni_pole (I). Data mohou byt do vstupniho pole vlozena operatorem, duplikovana z odpovidajicich 
pozic predchoziho zéznamu, duplikovana z pojmenované paméti (pomocna duplikace) nebo doplnéna klico- 
vym slovem INSERT. Data vlozena operdtorem mohou byt zménéna v rezimech zména a kontrola (prezkouse- 
ni). 


V rezimech vstup, vypocet a kontrola se vstupni pole zpocatku zobrazi jako prazdna. Data se 
zobrazuji postupné, lak jak jsou vkladana nebu prezkougena. Pole, ktera jsou plnéna duplikaci nebo 
klicovym slovem INSERT, se zobrazuji v tom poradi, v jakém jsou zapsana ve zdrojovem programu. 

V vezimu zména se zpocatku zobrazi obsan vech poli a zistava zobrazen po celou dobu zpracovani 
ubrazovkoveho format. 


Shouswérna gole iB 


3 zaca 


Obousnér na pole se od vstupnich poli 118i jen v rezimu vypocet. V tomto rezinu 
i u provadéni forwatu zobrazi potatecni hodnota kazdého obousmérného pole. Operator mize 

tuto hodnotu zménit nebo ji ponechat beze zmény. VSechna obousmérna pole musi byt pojmenovana, V 05- 
tatnich rezimech se obouswerna pole chovaji jako vstupni (1). 


Vjstugni_ pole Wystupni pole mohou byt naplnéna daty pouze z Programu; operator je nemize prino 
menit. Mohou byt bud pojmenovana a proménna, nebo Nepojmenovana a konstantni (s definici konstanty). 
Operator mize menit obsah proménnych vystupnich poli pouze neprimo, jestlize zméni obsah nektereho 
vstupniho Ci obousmérneho pole a program pak na Jeho zékladé zméni obsah vystupniho pole. ; 

V rezimech vstup, vypocet, kontrola (prezkougeni) a zména se véechna vystupni pole zpocatku 
zobrazi. Zistanou zobrazena po celou dobu Zpracovani obrazovkového formatu, pokud nejsou na obra- 
zovce dmysIné (progranem) prepsana. 


Pracovni avie {W). Pracovni pole je pamétové misto vyhrazené jen pro pouziti v programa. Musi 
yt pujmenovano a mize byt naplnéno pocatecni hodnatou pomoci klicového slova INSERT (v pribehu 
¢pracovani obrazovkového formatu. Operator nemize jeho obsah primo menit; mize je) zménit pouze ne 
primo, jestlize zméni obsah nékterého vstupniho ci obousmérného pole a program pak na jeho zaklade 
zmeni obsah pracavniho pale. 

Pracovni pole se nikdy nezobrazuje. 
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(sloupce 37 az 44) 


Tapisen v této rubrice urcujeme pocatecni pozici pole na obrazovce nebo v zaznamu jiného za- 
tizent, Pro obrazovku plati déleni rubriky "Pozice" na rubriky Radek" a "Sloupec". Pro zaznany na 
astatnich zarizenich se pouziva rubrika "Pozice" jako celek. Zapisy v rubrikach musi byt éiselné 
a zaroynané k pravemu okraji. 


Obrazovka. Zapis v rubrice “Radek” (sloupce 39 az 41) urduje Cislo radku obrazovky, na némz ma byt 
pole zobrazeno. Zapis je Cislo, které se vztahuje k Udaji z klicového slova SLNO v prikazu pro 
vstupni: format ‘formula Z). Cislo radku zadané v klicovem slové SLNO (popr. standardni hodnota 2, 
neni-li zadano) se povazuje za zékJad, k némuz se pricte zapis z rubriky "Radek" zmenseny o 1, 
Wsledek je Cislo Fadku obrazovky, na Neng se pole zobrazi. NejvySSi Cislo, které takto vznikne, 
nesai byt vetSi nezZ Cislu postedniho Fadku obrazavky. Zapis v rubrice "Sloupec" (sloupce 42 az 44) 
urtuje stoupec obrazovky ‘pozici v radku) potitany od 1 do 80. 

Neni-1i pozice pole zadana irubriky "Radek" a "Sloupec" zistaly prazdné), dosadi se standardni 
jezice - prvni voina pozice za posledné definovanym polem. Standardni pozice prvniho pole je: ra-~ 
deh 2, sloupec 1. : 2 

Bez ohledu na to, zda je, Ci neni zadano klicove slovo SLNO, jsou standardni pozice poli voleny 
tak, aby fadek uréeny pro napovédi nemohl byt prepsan obsahem Zadného pole. Nasledujici tabulka 
ulazuje nékteré nejdblezitéjsi kombinace zapisé. 


2 | Tapis Vysledny ] 
| 


v rubrice’| fadek 


| ‘adek" Jobrazovky | 


| Nezadin | 3 | 
1 2 | 
Nezadano 2 3 | 
|Nezadano | 3 | freer | 
SLNO(2) | Nezadan | 3 
SLNO(2) 1 2 
SLNO(2) 2 3 
SLNO(2) 3 125, 3 
--—-—--- | --------——-] -—-------- 
SLNO(3) Nezadan 4 
SLNO(3) 


1 3 
SLNO(3) 2 4 
SLNO(3) 3 5 
Qstatni_zarizeni. Zapis v rubrice *Pozice" urCuje pozici zacatku (prvni slabiky) pole v zaznamu po- 
Citanou Od 1 do délky zaznamu. 
Neni-li pozice zadana (rubrika "Pozice" zistala prazdna), dosadi se standardni pozice - prvni 
volné pozice za posledné definovanym polem. Standardni pozice prvniho pole je 1. 


53.1 Dals: 


funkce (sloupce 45 


_ Do této rubrik 
potfebujeme dopini 
Program (#RTN). § vy; 

fa klavesnici 


Y zapiSeme jedno nebo nékolik klicovych slov s potrebnymi parametry, jestlize 
t popis pole o dali charakteristiky nebo funkce, nebo jestlize popisujeme pod- 
y}imkou klicavych slov ARRATR a EDTCDE se vechna kli¢ova slova tykaji jen sou- 
Reaiiei. Obrazovce ~ DEVICE(CRT). Rubrika mize byt rozSifena pokracovacimi fadky. ; 
pr Shan vykonu funkei pri vypoctu je obecné dano poradim zapisu klicovych slov ve zdrojovem 
ie N@které funkce vsak maji pri vypottu prednost pred ostatnimi. : F ‘ 
dat di ae fe)vyssi prioritou jsou ty, které se uplatiuji jesté predtim, nez je zahajen vstup 
10 pole. Tam Odpovidaji tato klicova slova: 
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PHT (napoved na druhém Fadku obrazovky); 
DSPATR (zobrazovaci atributy pole). 


Dali prioritu maji funkce, které kontroluji klavesovy vstup a urcuji zdroj a umisténi vklada- 
nych dat. Tem odpovidaji tato klicova slava: 


AUXDUP (duplikace dat ze zvolené proménne Ci pole); 

CHECK (kontroly vkladanych znaki, automaticky preskok a automaticka duplikace z Odpovidayi- 
cich pozic predchoziho zaznamu); 

(naplnémi pole konstantou, hodnotou proménné ci pole nebo vysiedkem aritmeticke opera- 
ce). 


INSERT 


funkci v poradi 
funkcemi 


prenos dat z pole do pro- 
zadanymi u prave zpraco- 


Je-]1 pravé zpracovavané pole pojmenovano, je calsi 
ménné v paméti; odtud j}sou data Cerpana podle jména pole dalSimi 
vavaneho pole, napr. klicovym slovem EXSR. 

Dalsi prioritu maji funkce, které se provadéji pote, co skoncilo vkladani dat. Jejich poradi 

e dino poradim zapisu odpovidajicich kJicovych slov ve zdrojovem programy. Jsou to tato klicova 
slova: 


COMP (poravaani vstupnich dat s konstantou, obsahem proménné ci pole nebo s vysledkem arit- 
meticheho vyrazu); 

SEQ (kontrola usporadani vstupnich dat porovnanim s posledné takto kontrolovanymi daty); 

RANGE (urceni, zda vstupni data spada}1 do predepsaného rozsahu hodnot); 

AUXST  (ulozeni vstupnich dat do pameti pro pozdeéjsi pouziti ve funkci AUXDUP); 

ADD {pricteni vstupnich dat ke zvolenému stfadaci se zarovnanim desetinnych mist); 

SUB (adecteni vstupaich dat od zvoleného sti'adace se zarovnanim desetinnych mist); 

TADD ipricteni vstupnich dat ke stiddaéi #T0Tn bez zarovnani desetinnych mist); 


TSUB fodecteni vstupnich dat od stfadace #70Tn bez zarovnani desetinnych mist); 
RESET  {nuiovani stradace). 


Do této skupiny patri take funkce pro praci s tabulkami 
a pro nastaveni indikatord (kli€ova slova SETON, SETOF). 
vy tomto poradi: 


(klicova slova SUBST, RANGET, LOOK, XCHK) 
Klicove slovo SUBST zpisobuje vykon funkci 


i) Po ukonéeni ystupu jsou data ulozena do prave zpracovavaneho pole. 
2) Provedou se funkce klicovych slov zapsanych pred klicovym slovem SUBST. 
3) Provede se funkce k!icového slova SUBST (ndhrada vstupnich dat). 
4) Nahradni data se prenesou do pravé zpracovavaneho pole. | 
5) Provedou se funkce klicovych slov zapsanfch za klicovya slovem SUBST. 


Prehled o iom, pro které soubory plati jednotliva kli¢ova slova, je v nasledujici tabulce. 
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Kliéove |Klaves-]TFILE faa Komun: |Ostatn: 
nice 


Sr] ST] (RR (ARES Caine teeuni|ortatall 


slovo 


+ 


FHH He Hee eee eee eee eeeeeee 


+ + 


es ee | 


ah 


‘SHIFT 
SUB 


' 
| 
bt 
eft | 
ere ey 


Tnasenko + znanena, Ze kligové slovo mize by! pouzito, prazdno znamena, ze klicove slovo nemize 
byt pouzito. Oznaceni (+) znamena, Ze klicové slovo EDTCDE mize byt pouzito, jestlize se zaznam 
wapisuje na obrazovku (operaci WRITE ve formulari C). 


Nasleduje popis jednotlivych kli€ovych slov a jejich parametrd, Je usporadan podle abecedni- 
to poradi. 


= 
| 
| 
| 
| 
| 
| 


aes es Sk ee eS 
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ADD ( stFadac ) 


Kli€ove slovo ADD (add - prigist) zajisfuje pricteni cisla obsazeného v pravé Zpracovavanes 
Ciselném poli ke st?adaci a automatické zarovnani desetinnych mist. 

Parametr “stfadac" je povinny a musi byt jménem Ciselného pole definovaného v program, 

Cislo se pFitte Ye stfadaci az po vlozeni vSech dat do pole. 


mezery ) 


KliCové slovo ARRAT® (array attributes - vlastnosti tabulky) plati jen pro adkaz na tabulku 
iv evbrice po" je zapsdno jméno tadulky). Urcuje, kolik polozek tabulky (pofinaje pryni) se 

t am nebu zapise do zaznamu jako souvisly ddaj a kolik mezer je mezi kazdymi dvéaa 
polozeam), Neni-!i yadana, zpracuji se véechny tabulkové polozky. 

Parane': "pocet" je povinny a urtuje potet tabulkavych polozek, které se maji precist nebo za- 
psal potiinaje prvni polokou. Poget musi ayl celé Zislo od 1 do celkovéha poctu  tabulkovych polo- 
Zek nebo slovo #ALL, ‘teré sréuje zpracovéni vSech polasek. 

Paramaty “uezery" je repovinay a urcuje pocet mezer, které jsou mezi kazdymi dvéma polozkasi 

tg obrazovce). PFi Cteni zaznamu se mezery vynechavaji a polozy se ukladaji do 

Aly 3¢ zacaltu a% po stanoveny pocet polozex. Pri zdpisu se tabulkove polozky (potinaje prvni 

a hoate stanovenou} postupné zapisuji do zdznamu, prigem? se mezi nd vlozi ur€eny pocet mezer. (Ke 

zery mahou dsyt pozdéji prepsdny, napi. polozkami jiné tabulky.) Neni-li Parametr “mezery" zadin 

a jeli zadéno k1izové sluvo EDTCDE, vosadi se 25 neni-li klicové slovo EDTCDE zadéno, dosadi se 1, 
Naji-li tabulkave polodty v 2dznamu t&sné navazovat, musine zadat éislo 0. 


AUMDUP { ztro7 ) 


KIA Slova AUXDUP (auxiliary duplication - pomocnd duplikace) umozZiuje duplikovat data 

© zvoTeneho pole co prév3 zpracovavaného pole. 
Povinny par amatr “zdroj* musi byt jnéno definovaného pole, které mize byt jak znakové, tak 
Prdv8 zpracovavané pole mtze byt Pojmenované nebo nepojmenované a musi byt definovéno 


ta duplikaci 3e data prendgeji ze zdraje do pravé zpracovavaného pole zleva doprava 

znakd. Je-1i Zpracovavané pole krat3i nez zdroj, prebytecné (koncové) znaky zdroje 

Se nepre : Zpracovavane pole delSi neZ zdro}, dostanou se do zbytku zpracovavaného pole 

a zon esae ¢naky zdroje} nahudila data. Je tedy treba dbat na to, aby obé datové oblasti byly 
stejed dlouhé. 


2 AUXDUP se uplatns jen toby, je-3i zaprut rezim autowatické duplikace, nebo tehdy, 


TL operdtar kldvesu DUP. Jestlize Operator stiskne klévesu DUP poté, co jiz vlozil do pole 

nékolik znakd, + zkopiruje se zbytek znaki ze zdroje do zbytk svanate i i 
* paral ° k: 

duplikuji od soucasné pozice do konce pole, : 2 aN fe tea alae baal 


AUXST ( cil ) 


Kligové slovo AUXST (auxiliary store - é Seni shui i ive 
past na Pomocné ulozeni) umoziuje zkopirovat data z pravé zpra- 
Ccovavaného pole a ulozit je do zvoleného pole. Tato data Zi F. pri é ikaci 
t =. i 5 : mohou si: 2 dup] ikaci 
re uplatnéné u nékterého dalSiho vstupniho pole. aa Selle eM saath 
ovinny parametr "cil" musi byt jméno zvoleného pole, které mize byt j é Eiselné 
ets epee Shes : z ze byt jak znakové, tak Cciselne, 
fave Zpracovavane pole mize byt pojmenované nebo nepojwenovang. rape an eiiave pole defi- 


novana ty prekladaé j je si é = Sere e aaa Same 4 
ee ees prekladaé je definuje sims délkou a poctem desetinnych mist jako u zpracovave- 


Pri tomto ukladani se data prenaSeji z privé 
prava jako felézec zaaid. Je-li cilové pole kra! 
ky zpracovavaného pole se hepFenaseji. Je~ 


zpracovavaného pole do cilového pole zleva do 
“ *ralsl nez Zpracovavané pole, prebytecné (kancové) zne 
Hi cilové pole deli nez zpracovavané pole, zistava zbytet 
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se uplatni jen tehdy, je-li zapnet rezim automatické duplikace, 


CHECK ( fo ametr parametr a) 

Wiieeve stovo SHECK check - kontrola! umozfuje kontrolovat data v okamziku, kdy jsou vklada- 
a) 2 ‘a jak po viozen{ jednotlivého znaku, tak po vlozeni skupiny znaki nebo celého pole. Dale 
wal ie Wéit zpisob doplfovani vedoucich pozic pole zarovnavaného k pravému okraji, nastavovat 


2 poltatoval reZin aulomatického preskoku a automatické duplikace a pouzit{ lavesy DUP, zadat 


z 


podninné i nepodainéné mijeni pole, generaci hontrolnich zoakd pro samokontrolu a zpracavani pole 


aprava duleva. ' 1 5 ‘ y Bo 4% » 
Atespo’ jeden parametr musi by! zadan. Parametry moliox byt zapsény v libovolném pofadi, ne vSak 


y lidovalayzh kowbinacich, Owezeni jsuu uvedena vy tabulce na konci podkap. 5.3. 
Néslecuje popis parametr® v abecednim poradi. 


AD Autowaticha duplikave. Do pravé zpracovavaného pole se zkopiruje obsah odpavidajicich po- 
zic 4 pPedchoziho z4znamu, jestlize je zapnut rezim automaticke dup] i kace. Pri tom se ne- 
uplatai Kontrola typu dat, ani kontroly podle astatnich parametrd klicového slava CHECK. 
(V reZinu vypocet je vysledkem automatické duplikace vymaz prdvé zpracovavaneho pole.) 
Automaticky preskok (automatic skip). Pravé zpracovavané pole se vymaze, jestlize je zap- 
mut vezi aulomatické duplikace. 

Kontrola mezer (blank check). Tento parametr zakazuje vkladat mezery mezernikovou klave- 
sou, Selé pole mize byt vymazdno stiskem lavesy SKOK nebo POLE+ v prvni pozici pole. Je- 
-1i vSak zadan i parametr RB a pied stiskem klavesy POLE+ byla vloZena do pole data, budou 
V poli kromé dat i mezery a objevi se chybove hld3eni 1122 (chyba pri kontrole mezer). 
Mijeni pele pri prezkouSeni {bypass on verification). Tento parametr miji (potlacuje pre- 
zkousen() pravé zpracavavané pole. Data sou prijata bez prezkouSeni. Pole nize byt mijeno 
pocminené, je-)i kli¢ové slovo CHECK s parametrem BV zapsano na sekundarnim Fadku zaroven 
s indikatorem predstavujicim podminku pro mijeni. Sekundarni fadek musi ndsledovat za vSe~ 
fi pokratuvacimi fadky prikazu pro popis pravé definovaného pole (jsou-li ovsem pritomny). 

V sekundarnim fadku jsou povolery zdpisy v téchto rubrikach: 

i (2-5: poradové Cislo Fadku. 

(6): pismena A. 

= Indikator (9-10): dvouciferné Cislo indikatoru. 
= DalSi funkce (45-80): klidové slovo CHECK s parametrem BV nebo BY. 
Nijeni pole (bypass). Pole je mijeno a pripadna data, kterd v ném jsou, zistavaji nezmend- 
fia, Fole mize byt mijeno podminéné, je-li kli€ove slovo CHECK s parametren BY zapsano na 
sekundarnim Fadku zaroven s indikatorem predstavujicim podminku pro mijeni. Sekundarni ra- 
Gek musi nasledovat za vSemi pokracovacimi fadky prikazu pro popis pravé definovaneho po- 
le !jsou-1i ovSen pritomay). 

Fravidla pro vypInani sekundarniho Fadku jsou stejnd jako u parametru BV. 

Pollateni duplikce {duplication disable). Tento parametr potlacuje funkci klavesy DUP pra 
Pravé zpracovavand pule. 
Povinnd data (data required). Tento parametr predepisuje kontrolu obsahu pole tak, aby po 
ukonéeni vstupy obsahovalo alespon jeden nemezerovy znak. V prohlizecim formatu nemusi byt 
data de pole znovu vkldddne, jestlize tam jiz jsou. 
Povinné opusténi pole (field exit required). Tento parametr vyzZaduje stisk funkcni klavesy 
K opuSténi pole (k ukonéeni vstupu). Normalné ({j. bez parametru FE) je pole opusténo au- 
lomaticty po viozeni posledniho znaku. 

* Generace koatralnich znaki "modulo xx". Tento parametr zpdsobi, Ze po skonceni vstupu se 
Wygeneruji kontrolni znaky, které doplni hodnotu vstupniho pole, Je-li xx rovno 10 nebo 
1, pouzije se standardni algoritmus modulo 10 nebo modulo i1. Uzivatel mize zadat i jine 
algoritmy (viz podkap. 7.4). 

Poznamka: V algoritm: modulo 11 mdze z nékterych Cisel vzniknout kontrolni cislo 10, 
Meré vSak nenize byt doplnéno & pivodnimu cislu jako kontrolni znak. Tosu se musi aplika- 
ce prizpbsobil a tava éisla vyloucit ze souboru cisel podlehajicich sarokontrole. Pri 
Pokusu zpracovat takové Zislo se zobrazi systémova zprava. 
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(lower case). Tento parametr plati jen pro klavesnice typu psaci stro) a u- 
sladat a zobrazovat znaky v hornim i dolnim premyku. Neni-1i zadan, jsou véech- 
ny znaky chapany jako znaky v hornim prenyku. : “ 
Povinny vstup (mandatory entry). Do pole musi byt vlozen alespoh jeden znak. Za znak se 
povazuje i mezera vlozena mezernikovou klavesou. V prohlizecim formatu musi byt data do 
pole znovu viozena, i kdyz je jiz obsahuji. : 
Povinné zaplnéni (mandatory fill). Jestlize je pole vyplnéno mezerami, kdyz do naj vstoupi 
ukazatel (cursor - bézec), a operator vlozi alespoh jeden znak, musi pak vlozit Znaky do 
vSech ostatnich pozic pole, a to zleva doprava. Ukazatel se mize do pole dostat zepredy 
nebo zezadu. Neni-li v tom okamZiku pole vypInéno mezerami nebo nevlozi-)i Operator zad- 
ny znai, mize byt pole normalné preskoceno. 
Samokontrola "modulo xx". Fo dokonteni vslupu do pole se viozené Cislo kontroluje podle 
algoritm: samokontroly zadaného znaky xx. Je-li xx rovno 10 nebo 11, pouzije se standardn} 
algoritmus modulo 10 nebo modulo 11, Uzivatel mize zada! i jiné algoritwy (viz podkapitoly 
74), 
Zarovnani vpravo s doplnénim mezer (right adjust with blank fill). Tento parametr dovoluje 
zarovnat data, viuzend do pole o dvou a vice pozicich, doprava a dop)nit je zleva meze- 
rami, je-li to mozné. Jestlize operator vlozi do pole méné znaki, nez jich pole mize ob- 
sdhnout, a sliskne kldvesu pro zaravnani pole iPOLE+, POLE-), posunou se vlozené znaky 
k pravém ckraji pole a uprdzdn8na pozice vievo se doplni mezerami. 
Poznanka: Klavesou SKOK se nezarovnavaji data vpravo, ale maze se zbytek pole; klé- 
vesy VSTUP a POLE KROK zpisobi opuSténi pole bez zarovnani dat. 
Tprava Joleva {right to left). Vkladané znaky se do pole ukladaji od pravého okraje (pas- 
ledri jozice) smBrem k levém:. Tento parametr Ize vyuzit fapr. pri vkladani Ciselnych d- 
dajé potinaje jedaotkami pres desitky, stovky atd., aby vlozené cislo bylo rovnou zarovna- 
fo vpravo. Je-li pri vkladani dat do pole pouxita kldvesova funkce “oznaceni pole", znat- 
ha ‘X'FF') je umisténa do prvai pozice zleva. 
aravo s dop}nénim nul (right adjust with zero £111). Tento parametr Ucinkuje 
GRE, az na to, Ze zleva nedopliuje mezery, ale nuly. 


Na adr. 5.6 je prixlad zdpisu kligového slova CHECK. 
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Typ 


Lop DSPATR LOOK SEQ —sugsT 
| ARRATR EDTCOF FHT SETOF Tapp 
a i ae | AUXDUP ERROR RANSE SETON TUB 
[Typ dat] AUNST EXSR — RANGET SHIFT CH 
L MP INSERT RESET SUB konstanta 


HECK(AD AS BC BV BY DD DR FE Gux + 
LO ME MF Mxx RB RL RZ) 


pS So 


Si 


| 
Ts de: ki. Jakmile je pole Pripraveno 
vkladani dat, objevi se na fadiu ¢. 2 zprava {napoved) "Vlozte Cislo uctu". Do pole 
hou byt z klavesnice vlozeny jen cislice (6 af 9). Vkladana data se zobrazuji na tie- 
im dostupném. “ddku kidvesnice, ve dvanacté pozici. 


SSS 


Druhy Fadek je sekundarni. Rika, ze je-li zapnut indikator 23 
minuto_(pr. vynechano). Napoved se_nezobrazi z 


EEE 


COP ( relace data indikdtor ) 


Kligové slovo COMP (compare - porovnat) umoznuje porovnat data ve Zpracovavanem poli s kons- 
tantou, Sobsahea jineho pole nebo s vyslediem aritmetického vyrazu. Porovnani se uskutechuje az 
po dokon¢eni vstupu dat do Zpracovavaneho pole. 

Farametry "relace" a "data" JsOu povinné, parametr “indikator" Je nepovinny. 

Faranetr "velace” mize byt vyjadren jednim z techto kédd: 


1 Uta} v peli se ravnd nodnoté Parametru "data", 

iS Uda} v poli se nerovna hodnoté Parametru “data”, 

\T Udaj v poti je menSi nez hodnota parametru “data”. 

cr Uda) v poli je vatsi nez hodnota parametru "data". 

le Uday v poli je men3i nebo roven hodnoté Parametru "data". 
CE Udaj v poli je vétsi nebo roven hodnoté parametru "data". 


Par, “data” apz Re rs F ‘ 
wen data” urcuje hodnotu, s niz se Uda) v poli porovnava. Mize byt zadan jednim z techto 


i Jako jaéno j ingho pole neva proménné, 
Jako honstanta, 


~ jako a ¥ vi =e 
Hitch vyraz slozeny z konstant, jmen poli nebo Proménnych spojenych aritmetickym: ope- 
Yeeltant (+), odéitani (-), ndsobeni (#) a déleni {/). 


Ariteeticny vy ¢ 
tania a meee se vyhodnacuje zleva doprava tak, Ze nasobeni a déleni ma prednost pred sci- 


Paramety * Shops ot G ; 
0, blest Indikator urcuje indikator, ktery se Zapne, jestlize porovnani bylo ispésne, a vyp- 


faty “inditdter nae _nedspes . Povolené zépisy jsou cisla indikatord 01 az 99. Neni-li para- 
zadén, pak neuspesre porovnani vyvold zobrazeni chybové zpravy; je-li zadan, po- 


Formular A 


kratuje fel bez preruseni dele. r = 7 : 
iain a sista $2 poravnavaji padle znakoveho kddu, Ciselna data se porovnavaji algebraicky, 


Jmen Desetinna DSPATR LOOK SEQ 
| ae | mista | ARRATR EDTCDE PMT SETOF TADD 
| 


AUXST EXSR  RANGET SHIFT  XCHK 


pator) myny | feeeymn—4 AUXDUP ERROR RANGE SETON TSUB 
COMP INSERT RESET SUB konstanta 


zaznamu/ Typ dat} fl 
pole/ fenmnny [ [0/01 
tabulky | | 
aks 
| 


CHECK(AD AS BC BV BY DD DR FE Gxx + 


I 
| LC ME MF Mixx RB RL RZ) 
5 


9|Ufdek| 
heel 


p at kazdy znakovy retezec, ktery je vets 
nebo roven obsahu pole ZAKLAD. Znakovy retézec, ktery je mensi nez obsah 
pole ZAKLAD, zpdsobi_chybu. 


DSPATR ( atributy ) 


Kli€ove slovo DSPATR (display attributes - zobrazovaci atributy) dovoluje zvyraznit pole poso- 
€1 zobrazovacich atributi. Zobrazovaci atributy jsou zakddovany v jedné pametove slabice, ktera se 
ams{uje na obrazovku do dvou pozic ~ tésné pred pole a tésnd za pole. Tato slabika se vSak nezob- 
razuje, takze zobrazene pole je abklopeno dvema prazdnymi pozicemi. Jsou-li tedy zobrazena dvé pole 
vedle sebe, mély by mezi nim byt vynechany dvé prazdné pozice. Nékdy véak staci vynechat Jeno 
jednu pozici, zvlaste kdyz sousedni pole maji stejné atributy; tato pozice je pak sdilena obesa 
poli. 

Platné zapisy pro atributy jsou tyto: 
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[ atribut Wyznam 1 
BL Zobrazeny zaznam blikd - zhasina a rozsvéci se (blink). 1 
CA | U pravé popisovaného pole se rusi zobrazovaci atributy, | 
| které byly zadany v prikazu pra popis souboru a v pri-| 
kazu pro popis zaznamu. Plati pak jen ostatni cel 
Z pravé zapisovaneho klicoveho slova DSPATR, pokud 
jsou zadany. | 
cs Mezi znakovymi pozicemi se zobrazi oddélovace - 
| ~ tenké svisle Cary, které neomezuji kapacitu 
obrazovky (column separators). 
HI Zobrazené znaky zar'i zvySenou intenzitou (highlight). | 
ND Pole v zaznam se nezobrazuji (not displayed), | 
RI Pole v zaznamu se zobrazuji inverzné - tmave 
znaky na sviticim podkladé (reversed images). 
UL Kazda znakova pozice v polich zaznamu se podt rhne 
ne |, tusseriine) J 


Kombinace HI RI UL je chybnd. Je-11 tato kombinace zapsdna, nebo vznikne-1i 
atributd s atributy prenesenymi z prikazi pro popis souboru a popis zaznamu, pole 

Pozndnka: Je treba dbat urcité opatrnosti, jestlize pouzivame zobrazovaci 
5 napovedi nebo na prekryvajicim formatu, protoze atributové slabiky vymazou poz 
predchazejici poli a pozici bezprostfedné nasledujici za polem. Jestlize 
presaze alrihutova slabika znak v pozici 80 predchoziho jadku obrazovky, 
pienaze atributovd slabika znak v pozici 1 nasledujiciho radku. 


kombinaci zadanych 
se nezobrazi. 

atributy na Fadku 
‘ici bezprostredne 
pole zacina v pozici 1, 
Konci-li pole v pozici 80, 


EDTCDE { kod ‘zeak' ) 


‘ligove slovo EDTCDE (edit code - 
edi¢nich kod. Plati pouze tehdy, je- 
WRITE zadanou ve formulari C. 

Paranetr “kGd" je povinny a musi byt jednim z ediénich kédd predstavujicich zpisob dpravy 
(edice) Cisla. V ndsledujici tabulce jsou uvedeny ediéni kody spolu s jejich vyznamem. 


edicni kéd) dovoluje upravovat tvar Ciselnych tdajd pomoci 
li zaznam s pravé popisovanym polen Zapisovan vystupni operaci 


Formular A 5-25 


“7 
Symbol |Potlac. 
tecka |znamenka| ved. 
(Garka) nul 
a ee ee 
Ano | Bez zn.| Ano 
Ano | Bez zn.| Ano 
Ano | Bez zn.| Ano 
Ano | Bez zn.| Ano 


i Ne Ne Bez zn.| Ano Ano 
v4 Ne Ne Bez zn.| Ano | Mezera 


ee ee Oa oe ee 


Vysvetlivky k tabulces 


~ Ediéni kod X Gcinkuje stejné jako nezadané kligové slovo EDTCDE, tj. neupravuje Cislo. 
~ Edicni kod Y slouzi k Upravé data. Potlacuje vedouci nuly tfi az Sesticiferneho pole nebo dve ve- 
douci nuly sedmiciferného pole a vklada oddélovaci znaky mezi slozky data podle tohoto vzoru: 


nn/n 
nn/on 
an/nn/n 
nn/nn/nn 
nan/nn/nn 


Oddélovacim znaken mize byt jen tecka nebo lomitko (viz kligové slovo EDITC v prikazu pro specifi- 
kaci Ulohy (formulaF Z)). 

~ Ediéni kod Z upravi Cislo na kladné (opravi zénovou cast posledni slabiky pole) a potlaci vedouci 
nuly. 


Parametr "'znak'" je nepovinny. Mize byt pouzit jednak pro nahradu vedoucich nul hvézdickam, 
jednak pro dopinéni tzv. pohyblivého ménového symbolu. Je-1i parametrem '#', nahradi se vedouci nuly 
v Cisle hvézditkami. Je-li v parametru uveden ménovy symbol, bude tento symbol umistén tesné pred 
prvi nenulovou €islici vystupujiciho cisla. Ménovy symbol je dvouznakovy a musi byt shodny s odpo- 
vidajicim symbole zadanym vy klidovém slové EDITC prikazu pro specifikaci Glohy ({formular Z). Neni- 
oli kli€ové slovo EDITC zadano, musi byt parameter zapsan ve tvaru ' x' (mezera a znak meny). ro 
many symbol musi byt pri rozvrhu vystupniho Fadku pociténo se dvéma pozicemi navic (zleva od Cis- 
ale 

Znaky, které se skutecné v upraveném Cisle tisknou, jsou uréeny klicovym slovem EDITC prikazu 
pro specifikaci Glohy (formular Z), Neni-li zadano, tisknou se standardni znaky. 


__ V ndsledujici tabulce jsou uvedeny priklady rznjch gisel upravenych edicnimi kddy podle evrop- 
skych 2vyklosti, 
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[ eaiéni 
hod 
Dve Bez 
des. sea nist des. mistaldes. mist 


zadny |1234567 | 1234567 
12,345,67 |1. 
12.345,67 [1.234.547 
12345,67 [1234567 | 
12345,67 [1234567 | __0, H 
12.345,67 [1.234.567 |__0, 120cP 
12.345,67 |1.234.567 |__0, 120C8 
12045,67 | 1234567 
12345,67 | 1234567 
12,345,467 | 1.234567 
12.345,67 | 1.234567 
12345,67 | 1234567 
12345,67 {1234567 |_ 
1234567 [1224567 |00012_ 

Ecol 123.45.67 |_0.01.20 


{000000 
{0.00.00 


\ 
{000000 


1234567 1234567 


wowwenndan. 


ek ee ae 


Wsvatlivky k tabulce: 


~ Inak _ (podtrhauti) znamend mezeru; netiskne se. 

~ Deset inna Carka, tecka odd@lujici tisice a tecka rozCletujici datum se tiskne za predpakladu, ze 
¥ prikazu pro specifikaci Glohy bylo zadano ve Slovo ERITC(' ™,.,'3, ‘hoz parametry jsou mo- 
difikaci standardnich parametré: EDITC(' x.,/'), 


ERROR ( Cislo ‘text’ ) 


_ Klitove slovo ERROR (error - chyba) vytvari podminky podobné tén, které venitajy y distedku 
ediénich chyb Pra porizovani dat. (Edicni chyby jsou ty, <tere se objevi po kontvole obsatu v= 
is pole, Jaknile Je opusteno.) Je-li zapsano na sekunddrnim Fadku ve Spujen 
ice Indikator a je-li pri zpracovani pole tento indikator Zapnut, zobrazi se na stavuvem faut: 
ee Zprava a stavovy Fadek blika. 

‘aranetr "Cislo" je povinny a predstavuje kéd c 2 ivy. Sini : Gi az 
Je kod chybové zpravy. Simi mit hodaot. Gt az 99. Tobra- 
a igh: sh 98x, kde xx je hodnota parametru "Eislo". : 
aranetr 'text'" je nepovinny a predstave ry ack ! 

; : Je text, klery se zobrazi na stavovem faédku, jestlize 
i p } 
eo ink aan TEXT Vv okamziku, kdy stavovy fdcek uiazuje chyau. Hodro!s yaranetsu 

n y text uzavreny v apostrofech, iter Wl Llizevy<va a 
ptf se aes y postrofech, ktery by mal Llize vysvalli 


vehi chyhy, 7i 


BSR ( podprogran.) 


Kligove slova exer 
& z 5 STiaaiiate fat a : 
Mer zapsanve imate oe subroutine Provest podprogram) zplisobi odskos do podp oOyr amu, 
arametr * 2 
ae Je jmena podprogram. zapsané v 1. operandu p'tkazu BEGSR na formulali 0. 
trotoze pe ralla We provadét Zadné aperace s blavesnici a ohvazevkou, ani emése olevirat soubory 
ram soubor) se pouziv’ obrazoviia a klavesnice}. 


4 507 


Foraular 


INSERT ( pole ) 
INSERT ( vyraz ) 
INSERT ( konstanta ) 


Klicove slovo INSERT zpisobuje presun dat ze zdroje dat do pravé popisovaného pole, Tdrojee 
dat mize byt jiné pole, vysledes aritmetickeho vyrazu nebo konstanta. Operator nemize data y poli 
prepsat. 

Parametr "pole" predstavuje jméno pole, z néhoz se maji data Cerpat. Jeho typ (znakovy, Cise)- 
ny) se musi shodovat s typem popisovaného pole. Znakova data jsou zaruvnana doleva a popr. doplngng 
mezerami vpravo (je-li popisované pole delsi ez zdrajavé) nebo zkracena zprava ije-li papisovans 
pole kratSi nez zdrojove). Ciselnd data jsou zarovnana doprava (s ohledem na desetinnd mista} a 
okrouhlena; je-li popisovane pole delsi nez zdrojove, ;sou data doplnéna zleva aulami. Zuendoin 
zdrojoveho pole se také prenasi. Jako zdrojove pole aize byt pouzit i stfddac produkénich statis- 
tik #STATn, stfadac #T0Tn a systémové datum UDATE. 

Parametr "vyraz" predstavuje aritmeticky vyraz slazeny z operaci sCitani (+), odé{tani +), 
nasobeni (#) a déleni (/). Nasobeni a déleni ma pri vypocte prednost pied stitanim a od€itanin, 
Operandy mohou byt jména Ciselnych poli, véetné stiédacd #T0Tn (které jsou v tamto pripadé 15 
bez desetinnych mist). Vyraz nesmi cbhsahovat zdvorky ani nezery. Vysledek vyrazu se presune 
sovaného pole i se znaménkem a je 2arovnan podle desetinnych mist. Pri zarovnani mide dojit & 4- 
plnéni nul nebo zkraceni cisla zleva, pop?. k zaokrouhleni posledniho mista. 

Parametr “konstanta” byt znakova nebo elnd konstan!a, podJe type popisuvaného pole, 
Znakova konstanta se pri presunu zarovnava vlevo, ciselnd konstanta se zarovasvi sodie desetinnjch 
mist. Desetinna tecka (€arka) se neprenasi. 


(aero 
Indikator | | | | DalSi funkce | 
(CHECK ERROR)| Typ : ! 


seanaeanpapuanuancnyaampunaneneneasanpaanananpannaesaneneensn ans anamennmesem antes 


pecenn mewn nnnnnnnnnnennnnnnnnnnnnwene! 


| 
| y { 
——aaacmen jména 
i Pomaakal dl Desetinna ADD  DSPATR LOOK SEQ SUBST | 
fewewmnny | | fennenny | mista | APRATR EDTCDE FMT © SETOF TAD | 
| wwnnemnzny_ | fem=p---| AUXDUF ERROR RANGE SETON TSU | 
| [typ dat] | | AUXST EXSR  RANGET SHIFT xCH | 
a 1 I ; |_| COMP INSERT RESET SUB konstants 
z. CHECK (AD AS 3C BY Bye=n-nennee reoeeely 
LC ME MF Mxx | Hodnota v poli 
5. 6 CISLG po prove-| 
deni operace: ; 


~123,456 
-123, 
0012345600 


2346 


Vysvétlivky k obr. 5. 


Tnaménko Cisla v Ciselnen poli je umisténo v zdnové ésti jeho posledni slabiky. Je to znazornéno 
nadtrzenim posledai Cislice ve vysledné hodnaté, 


~ MySlena desetinna carka ve wysledku u tietiho a étvrtého prikladu je mezi trojkou a étyrkou. U po 
sledniho prikladu je pred nulou. 
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LOK ( tabulka index ) 


Kligové slovo LOOK (look up - hledat) dovoluje srovnavat hodnotu pole s polozkani {ato 
zjistit, se Kterou polazkou se shoduje. : 
Paranetr “tabulka” je povinny a predstavuje jméno tabulky. Tabulkové polozky ausi byt stejné 
dlouhé jat2 porovnivané pole. peste se hodnota pole shoduje s hodnotou nékteré tabulkové poloz- 
ky, zpracovani pokracuje. Jestlize ne, ohlasi se chyba. ~ 

Paranetr "index" je nepovinny a predstavuje jméno proménné, do niz se ulodi index (pofadové 
disla) tabulkové polozky, jeji2 hodnota se shoduje s hodiotou Kontrolovaného pole. Nevale:ne-Ii se 
hodnota pole v zédné tabulkove polozce, dosadi se index 1. Proméand ma standardni vélku § Cistic 
ber desetinnych mist, jestlize neni jinde vyslovné definovéna. Mize byt definovana jako pracuvni 
pole Wy rubrice "Uziti") s jinou délkou a s poctem desetinnych mist 0, Jméno proménnd y parametou 
"index" nesmi mit vice nez 6 znakd. 


oceeeenenennyenemennnyay 
| Indikator | " alsi funkce 
pica | y Uziti 


Jeemenmeneney [Pozice 


| Pozndakal | | Jaana Desetinna | ADD 


| | i souboru/ 


zaznamu/ 


DSPATR LOOK SEQ 

| nista ARRATR EDTCDE PMT © SETOF TADD 
AUXDUP ERROR RANGE SETON TSUB 

| AUXST EXSR RANGET SHIFT XCHK 

| ‘ COMP INSERT RESET SUB konstanta 

| 


Wsvétlivky k obr. 5.9 


~ VlOgi-1i operator do ez 
Baynes pole POLOZK Eislo 0017, ulozi di ci xj r é 
Cisk y 1 Uloz1 se do pole PRIHRA Cislo 03, coz je poradove 
0 prihradky (polozky tabulky VZORKY), v niz je Zislo 0017 (vzorek) iilozenes : 


PAT ( npoved 
AC ‘népovags 


Klitové 5} hve 
‘Ovo PAT (prompt - ndpovéd) dovoluje zobrazit vysvétiujici text - napoved - v okam- 


Formula? A 5-29 


Z le priprav ladani ext ndpovédi se zobrazi 1a obrazovce potinaje 1 
Ziku, kdy je pole pripraveno ke vkladani dat. Te t napove i razuy ? 2]2 Slaup- 
a { rédku a 2 a mize pokracovat na dalSich radcich (podle toho, jak je dlouhy). Frechudem 5 rf 
Simu poli se cela ndpovéd vymaze. : bath . ~ 

Paranal? "napoved" mize byt jakykoliv text dlouhy nejvySe 20C znaki. Mize absahovat véechyy 
zobrazitelné znaky a mezery. Jestlize text obsahuje peave zavorky, apostroty, Same MeEZECY, vedouc{ 
mezery nebo koncové mezery, musi byt zapsan jako znakova konstanta, t;. uzavren v apostrofech, Vni- 
tfni apostrof pak musi Sy! zapsin jako dvojice apostrofi. Normaln@ se text do apostrofd neuzavird, 


Indikator 
beh Typ 
jmena 

Jnéno ADD DSPATR LOOK SUBST 

i ARRATR EDTCDE PNT TOF ADD 

souboru/ yrmad AUXDUP ERROR RANGE TSUB 

zaznamu/ AUXST EXSR  RANGET SHIFT NCHK 
INSERT RESET SUB kanstanta 


CHECK (AD AS BC BV BY DD DR FE Gxx + 
LC ME MF Mxx RB Ri RZ) 
6 7. 


Wsvétlivky k abr. 5.10: 
~ Od zatétku Fadbu &. 2 se zobrazi pri zpracovani pole tato zprava: 


Tento priklad ukazuje pouziti apostrofu ("} a zavorek v textu, ktery proto musi 
byt uzavfen v apostrofech, 


RANGE ( dolni horni ) 


Kligové slovo RANGE (range - rozsah) dovoluje kontrolovat, zda hodnota pole lezi v roznezi 
dvou zadanych hodnot. Hodnota pole musi byt vétSi nebo rovna dolni hodnoté a men3i nebo rovna hul- 
ni hodnoté. V tom pFipade zpracovani pokracuje, ‘jinak se ohlas{ chyba. 

Oba parametry jsou povinné. Parametr “dolni* predstavuje dolni zadanou Sodnotu, paranetr “hor 
ni* horni zadanou hodnotu. Oba parametry musi byt stejného typu (znakového neba Ziselného) shodnele 
S typem kontrolovaného pole. Mahou byt zadany ve forme konstanty nebo jwéna jiného pole. Ciselni 
data se porovnavaji algebraicty po pFédchozim zarovnani podle deselinnych mist. 
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DSPATR LOOK 
| ARRATR EDTCDE PHT 
myeem| AUXDUP ERROR RANGE 
AUXST EXSR — RANGET SHIFT 
COMP INSERT RESET SUP konstanta 
Ra-|S1. 
dek CHECK(AD AS BC BV BY DD DR FE Gx 
LO ME ME Mxx RB RL RZ) 
5 é 


Wsvatlivky k obr. 5.ii: 


~V druhéa prikladu musi byt obsah pole DLOUHY vétéi nez 1,40. 
~ Ve Etvrtéa prikladu musi byt obsah pole POZNZN menzi (ve znakové tFidici sekvenci) nez ACZ-99-99. 


RANGET ( tabulka index ) 


‘ Kligové slovo RANGET (range table - tabulka rozsahd) dovoluje kontrolovat hodnotu pole, zda 
Jedi v nékteréa z nékolika zadanych rozsahé hodnot (intervald). 

, Paranetr "tabulka" je Povinny a predstavuje jwéno tabulky, kterd obsahije dvojice polozek. Prv- 
1 polodka kazdé dvojice Obsahuje zadanou doln{ hodnotu, druhd poloz%a horni hodnotu. Jestlize 
hodnota zpracovavaného pala ‘e3/ v nésterém ze zadanych rozsaht {véetné krajnich hodnot), vypoéet 
poltatuje, Jinst sv ohtést chyba. 


«,, Paranetr "index" je nepovinny a predstavuje jméno proménné, do niz se ulozi index (poradové 

tislo) toho ze zadanjch rozsahd, v némi le3{ hodnota \ontralovarého pole. Nelezi-li hodnota pole 

¥ Hira ze zadanych rozsahi, dosad{ se za index Cislo {a ohlasi se chyba. Indexova proménnd ma 

standardai détku 5 Efstic @ news 284nd desetinnd nista, iesttife neni vyslovné definavdra jinda, 

Bie Bt definovina jako pracovel gole tY v rubrice "SILI" 5 jinou ¢é3kcu a s poftem desetinnych 
Hodnoty 


% prrovadvali vidy znaiwe, af je pole znatavé “sto Ciseln’, 


Formula? A 


| (CHECK, ERROR) 


FREKV CISPAS 


ie 


=] 


~ Vlozi-li operator do pole FREKV hodno 
a do pole CISPAS se LloFi Cislo Ot. Ny, 


RESET { pale } 


XViCové slovo RESET (reset - znovu nastavit) 
Parametr "pole" je Povinny a musi byt jménem 
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Sa an 
Dal 


a as 


DSPATR LOOK 
ARRATR EDTCDE PMT 


SUB kanstanta 
CHECKAD AS BC BV BY DD DR FE ix 4! 
LC ME MF Mxx RB RL RZ) 

qi 


ht dew 
[2345678901 025567600 


zpsobi vynulovani vech pozic pole. 
Ciselného pole (véetné st#ddacd #T0T1 az #T0T9). 


360 { relace ) 


xiidové slove SFO (sequence - poradi) dovoluje porovnavat data pravé zpracovavaného pole 
Kue ali, které bylo naposledy porovnavano (kli€ovym slovem SEQ), Data se Porovnavaji znakove, 
slaty v Pe Aialty newélo byt delSi nez 16 pozic; je-li del3i, porovnd se jen prynich 14 znak. 
Pe eetrlace! je povinny a musi by! zakddovan jednim z nasledujicich kédd: 


£0 Data se musi rovnat datdm z naposled poroyndvaného pole. 
Data se nesin®j{ rovnat dat&m z naposied porovndvaného pole. 
Data musi byt vétSi nebo rovna datdm z naposled porovnavaného pole. 
Data ausi byt menSi nebo rovna datim z naposled porovnavaného pole. 
Data musi byt vetSi nez data z naposled Porovnavaného pole, 
Data musi by! menSi nez data z naposled porovnavaného pole. 


Furoynani se provadi az poté, co by}a vSechna data do pole vlozena. Jakmile je porovnani skon- 
fen, presunou se data z prévé zpracovavaného pole do pracovni paméti, kde nahradi predchazejici 
dla, Jestlize porovnani nebylo spésné, ohlasi se chyba. Poprvé, kdy se porovnani Provadi, nejsou 
jest v pracovni panéti Zadné data, s nimiz by se pravé vlozena data mohla porovnavat; porovnani je 
¥ los pripadé dspesne. 


SEITE { indikator ) 
SEIN { indikator } 


Kligové slova SETOF (set off - vypnout) a SETON (set on ~ zapnout) umozfiuji vypinat a zapinat 
indikatory; SETOF vypind indixator, SETON zapina indikator. 
Parapetr "indikator" je povinny a musi byt jednim z Cisel indixdtord 01 at 99. 


SHIFT « avenyk } 


Mlitové slovo SHIFT (shift - posuv, premyk} musi byt zadéno, je-li v rubrice "Typ dat" zapsan 
640, Dovoluje urZit jednotlivym pozicim pole rfizné vlastnosti. 

Paranelr "premyk" je poviany a musi byt zapsdn jako souvisly Fetézec znakd, pro kazdou pozici 
pole jeden znak. Platné znaky a jejich vyznam jscu uvedeny v nasledujicim seznamu: 


A Abecedni pfemyk. Je zovolero vklddat vSechny znaky. Klavesnice je nastavena v premyku, ktery 
wale viladat dolni znaky na azdé kldvese, Operator mize toto nastaveni zménit premykaci 
évesou, 
Jen Cislice ‘digits only). Do pole mohou byt vlozeny jen Cislice 0 az 9. Neni nutné pouzivat 
cache \lavesy. Zéporna Cisla se zobrazuj{ se znamenkem nad posledni cislici (oznatujici 
jednalky), 
Hexadecinsini Gislice. Kadi zaakovd pozice vyZaduje dva klavesové Uhozy. Lze pouzit jen klaves 
jtisliceai 6 az 9.as pismeny A ak F. Neni nulné pouzivat Zécné prenykaci klavesy. 
Aselay (numericky) pFemyk. Je Povoleno vkladat vSechny znaky. Klavesnice je nastavena do dol- 
mho pfenyk. u Lldvasnice pra psaci stroj a do horniho premyku u klvesnice pro vstup da. Spe- 
rator atie foto nastaveni zmanit premykaci kidvesou. 
Revervovan0 pro speciélni pouziti. 
Rezervovéno aro speciaini pouziti. 
Jen abecedni zaky. Da pole mohou byt viozena jen velka pismena, carka, tecka, pomitka a meze- 


ra, Klavesnice j@ nastavena na doini znaky kiaves. Operd!or miZe toto nastaveni zménit preny- 
fac! kidvesou, 


+ Bo pole muhuu byt Vlozeny jen znaky 0 a2 9, carka, tecka, plus, minus a me- 


Je jastavena do dolaiho p¥emyxu u kldvesnice pro psaci stroj a do horniho pre- 
® 770 vstus dat. Operdtar mize toto aastaveri zménit premykaci klavesou. 


Formulak A 5-33 


a wee nnngenncenen, 
Indikator } 
CHECK,ERROR)} © Typ 
mwmmepay | jena 
Poznamka| | | 


nyrseneeenqeneye: 


| tee 
| } uziti | $ 
Jenwenmeneney |Pozice | 
| { Desetiana } | | ADD DSPATR LOOK SEQ gupcr 
12 mista V4 | ARRATR EDTCDE PMT. SETOF Tapp 
pee benrwmmmpay } fom=voo=j AUXDUP ERROR RANGE SETON Tug 
zéznamu/! Typ dat} 11] } | AUXST. EXSR  RANGET SHIFT - xonK 
poles |  fewneny | [ofa] | COMP INSERT RESET SUB konstanta| 
i 1 | 1 {)B}Ra-{si.} 
WDélxa}) J9lWidek] | CHECK(AD AS BC BV BY DD DR FE Gy 4 
\ LC ME MF Mixx RB RL RZ) 
6 7 


28 7518 


8901234567890 12a 


| 
| 
| 
| 


a 


SUB ( stradac ) 


Klicave slovo SUB (subtract - odegist) zajistuje odeéteni Cisla Obsazeného v pravé zpracové- 
vaném poli od stradaée a automatické Zarovnani desetinnych mist. 

Parametr “stradat" je Povinny a musi byt jménem numerického ole definovaného v program. 

Cislo se odecte od stradace aF po vlozeni vSech dat do pole. 


SUBST ( tabulkal! tabulka? index ) 

Kliové slovo SUBST (substitute - dosadit) umoZfuje dosadit aisto vlozenych dat data nalezeni 
v tabulce, Pouziva se dvou tabulek, z nich? prvni je ta, v niz se hled’ polozka, jejiz obsah se 
shoduje s vlozenymi daty. Nalezne-1j S@, prepisi se vlozend data v pravé zpracavavaném poli. obsahes 
stejnolehlé polozky druhé tabulky. Nenalezne-Li se, ohlasi se chyba. 

Parametr "tabulkal" je Povinny a musi byt jménem tabulky obsahujici ve svych polozkach hodnoty, 
S MlmzZ se porovnavaji vlozena data. 

Parametr “tabulka2" je Dovinny a musi byt jménem tadulky, z jejich? polozek se cerpaji dosazo- 
vané hadnaty, 


araaety yt jménen. Eiselngha pole, které adie (ale 


x11 pole pro index definovano v programu, urci mu prekladat 

desetinnych mist. Po dspaéném vyhledani dat v prvni_ tabulce se do 

islo nalezené polozky ~ index. Po nedspéSném hledani se dosadi ¢is- 

Tpracavavane pole musi byt dostatecnd dlouhé, aby pojalo dosazovana data Z celé polozky druhé 

tabulky, Delka dat, ktera operator vklada do vstupniho Pole, je urcena délkou polozky v prvni te- 
bulce. Polozky druhe tabulky by mély byt stejné dlouhé jako polozky Prvni tabulky nebo delsi, 


Poznamka: PFi zpracovani cole s kli€ovym slovem SUBST neni povolena funkce klavesy DUP (dup- 
likace z predchoziho zaznamu), 


Poradi €innost{ spojenych s klicovym slovem SUBST J@ popsano y odst, 5.3.10. 
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Sa oe ean es Seeieeiianiaes Siete 


amet TT | 


uziti 
| (CHECK, ERROR) 


aetiandil 
mista | 
inven | 
it} 
B 


SOHN CHURCHILL THE DUKE OF MARLBOROUGH ] 
ARMAND JEAN DU PLESTS DE RICHELIEU 
ALBRECHT EUSEBIUS WENZEL VON WALLENSTEIN| 
1003] [RICHARD COEUR DE LION 
1005) fais a DER STARKE | 
1009} {GAIUS JULIUS CAESAR OCTAVIANUS AUGUSTUS 


Obr. 5.1 


TADD ( #T0Th ) 


Kli€ové slovo TADD (total add - oricist k souhrnu) pricita obsah covan 
takze se nezarovnava na desetinna mista. 


dati. Obsah pale se Dovazuje za celé Cislo, 
Provede a2 po viozeni véech dat do pole. 
Paranetr "#T0Tn" nusi byt jedno z rezervovanycn 


nanan nnn ny 
{ j Dalsi funkce | 
| ieee aco 
Pozice 
| | ADD  DSPATR LOGK SEQ —_supsT | 
| ARRATR EDTCDE PMT SETOF TaD | 
=yom—| AUXDUP ERROR RANGE SETON TSUB | 
} | AUXST ExsR 
{| COMP 
Ra-|51.{ 
| CHECK(AD AS BC BV BY DD DR FE Gxx +] 
LO ME MF Mixx RB RL RZ) 


RANGET SHIFT XCHK 
INSERT RESET SUB konstanta| 


do pole JMENO Cislo 
1003 a stiskne klavesu POLE KROK, ulozi se do 
poli JMENO a INDEX postupné tyto hodnoty: 
JMENO 


[Teron eew ee necenecenenenee. 


1003 


mE Pires sees a 


RICHARD COEUR DE LION | 


INDEX 
fs] 
| 


4 


zpracovaneho pole ke stra- 
Pricteni se 


slov #TQT1 az *TOT9. 


V regime vstup se ofi zpetném pohybu (dovnitr pole nebo pres né) prictena hodnota zase odette. 


V retin zména a xontrola 


(pFezkouSeni) se 07 i zo&tném pohybu hodnota st#ddace neméni. Jestlize se 


pole znowy zpracovava smérem vpred, ie obsah stradace axtualizovan prictenim rozdilu nezi pocatecni 


a koneénou hodnotou pole. 


TUB ( #T0Th.) 


Sligové slovo TSUB (total 
Od stfadace. Obsah pole se povazuje za celé ¢islo, 
Cleni se provede ai 90 vlozeni vsech dat do pole. 

Paranetr "T0Tn" musi byt jedno z rezervovanych 


subtract - odecist od souhrnu) 


Zpracovavaneho pole 
mista. Ode- 


odecita obsah 
takZe se nezarovnava na desetinna 


slov #T0T1 az *TOT9. 


V retin vstup se oi zpétnén pohybu (dovnitr gole nebo pres né) odectend nodnota zase piicte. 


V retinu zaéna a kontrola 


(prezkouseni) se pri zpétném pohybu ho¢nota stradace nemeni, Jest) 


tole znovu zpracovava spéren vpred, je obsah stfadace aktualizovan odeétenim rozdilu mezi potetecni 


3 Kone nou hadnatou pole. 


Formular A 5-35 


@ se 


XCHK { tadulka argument! argument? ) 


Kli€ove siovo XCHK (cross check - pritna <ontrola) dovoluje porovnat dvojici PO)menovanjch 
proménnycn (poli) s dvojicem) tabulkovych polozek. Po}menovanée Promenne mohou absahovat api. bode 
noty index napinénych funkcemi LOGK nebo RANGET Provedenymi déive. Mohou ovéem Obsahovat j jing 
nodnoty. Funkce XCHK tedy umoziuje xontrolovat vzdjemnou zavislost mezi hodnotami dvou vstupnich 
boli. Vsechny t*) parametry jsou pavinné a musi byt Zapsany v uvedeném poradi. 

Parametr “tabulka" musi byt jméno tabulky, jejizZ vSechny polozky odsahuji hodnaty. Tyto poloz- 
ky S@ pouzivaji ve dvojicich, musi jich byt tedy sudy pocet. 

Parametr "argument 1" (a "argument2") je jméno ciselné Proménné. Tato proménna maz 
byt Gefinovana v orogramu. Neni-l1 definovana, definuje ji preklada¢ jaxo patimistne 
setinnych mist. Deixy téchto promennych by mély byt ste)neé a shodné s delkou tabulkové polozky. 

Spoyené obsahy proménnych argument! a argument2 se povazuji za masku, ktera slouzi jako vyhle- 
davaci argument pri hledani v tabulce, Nalezne-li se dvojice polozek, je)iz obsah je shodny s nas- 
Kou, Zpracovani pokracuje; jinak se ohlasi chyba. 


Lienert isis omcaraeay pooran ce Sane Saar: se meetee o m eeeees s 
| Indikator | 1] | | | 
| (CHECK,ERROR)| Typ Uziti | eone-| 
aenenesayy | 
| Poznamka} | [| ADD DSPATR LOOK SEQ —_supst | 
ARRATR EDTCDE PNT SETOF  TADD 
AUXDUP ERROR RANGE SETON TSUB | 
AUXST EXSR — RANGET SHIFT XCHK 
COMP INSERT RESET SUB xonstanta 


CHECK(AD AS BC BV BY DD DR FE Gxx +} 
LC ME MF Mxx RB RL RZ) 


8 
A 
a 
A 


| 
F 


Sire 


ea Ae = NF 

Dvojice ladnych barev 

karoserie/Calounéni: 
Cervena/Cervena 
Cervena/cerna 
€ervena/bild 
Cerna/Cervena 
Cerna/cerna 
Cerna/bila 
oranzova/cerna 
oranzova/oranzova 
bila/Cervena 
bila/éerna 
bila/bila 


= 


Obr. 5.15 
Vysvetlivky k obr. 5.15: 


~ V tomto prikladu se pouzivajs dvé tabulkys BARVY a LADNE. V tabulce BARVY vyhleda operace LOOK 
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é vlozi operator do poli BARKAR (barva karoserie) a BARCAL (barva Calounéni). 
zeratky it aera polozek (indexy) ulozi do poli IKAR a ICAL. Pak Operace XCHK zkon- 
Rar eral tatulky LADNE), zda obé barvy ladi (tj. zda se v tabulce LADNE vyskytuje dvojice 

troluje (poate ich IKAR a ITAB). 
tisel Coe aie tabulky LADNE jen s oranzovou karoserii. Cervena karoserie neladi 
- Orandove Calounen 
s bilya thet v tabulkach nenalezne shodna hodnota (v tabulce BARVY zkratka barvy, v ta- 


~lestlite =e ce en obsah poli IKAR a ICAL), zobrazi se na stavovém Fadku chyba. 
pulce LADNE 


Formula? A 5-37 


Soutasné zadand kli¢ova slova i Paranetry 
(pFipustna +, nepFipustna -) klid.slova CHECK 


vSechny 
vSechny 
vSechny 
vSechny 
vSechny 
véechny 
Zadné 
vSechny 
vSechny 
Zadné 
vSechny 
v5echny 
vSechny. 
vSechny 
vSechny 
véechny 
vSechny 
c 
vSechny 
vSechny 
vSechny 
vSechny 
vSechny 
vSechny 
vSechny 
vSechny 
vSechny 
Zadné 
vSechny 
vSechny 
vSechny 
vSechny 


~ ARRATR TADD TSUB 
~ AUXDUP EDTCDE INSERT SHIFT 
~ EDTCDE 
~ ETDCDE INSERT 
DSPATR 
ARRATR DSPATR 
EDTCDE INSERT 
EDTCDE 
ADD ARRATR AUXST DSPATR EXSR SETON/SETOF PNT 
~ EDTCDE INSERT 
|SETON/SETOF|- EDTCDE 
PHT ~ EDTCDE PNT 
RANGE - EDTCDE INSERT RANGE 
JRANGET ~ EDTCDE INSERT RANGET 
> EDTCDE 
- EDTCDE INSERT SEQ 
~ EDTCDE INSERT SHIFT 
~ EDTCDE 
~ AUXDUP EDTCDE INSERT SUBST TAD 
~ EDTCDE SUBST 
SUBST 
INSERT 
~ AUXDUP EDTCDE INSERT SUBST 
~ AUXDUP EDTCDE INSERT 
- EDTCDE INSERT 
~ EDTCDE INSERT 
|+ ARRATR DsPaTR 
BY-1]- EDTCDE INSERT 
DD [ EDTCDE INSERT 
DR |- EDTCDE INSERT 
FE |- EDTCDE INSERT 
Gxx |- EDTCDE INSERT 
ME |- EDTCDE INSERT 
MF J- EDTCDE INSERT 
Mxx |- EDTCDE INSERT 
RB J- EDTCDE INSERT 
RL | EDTCDE INSERT 
INSERT 


a 


+++ +++ + 


w 


Sees sy 


22 


+e tere error r++ ee 


BY 
BY 
BY 
BY 
AD 
BY 
BY 
BY 
AD 
AD 
BC 
BY 


te 
BS 
= 


2Re2R5 
+++ 7 


geezersez 


GAAeaAs 
B 
Zz 


2 


Wysvétlivky k tabulce: Wysvétlivky k tabulce: 


Znaménko - znameni, Ze &) 
(parametrem) uveden: 
Znaménko + znanena, 3 


Thabia ~ Znanend, Ze tidaje uvedené vpravo od néj nesméji byt zapsany soucasné s klicovym slovem 
_ Patanetren) uvedenym y Prvni rubrice. Ostatni ddaje jsou pFipustné (jestlize avéem existuji), 
iGuaey * znanena, Ze idaje uvedené vpravo od néj sméji byt Zapsany soucasné s kligovym slovem 
= teu re wedenyn V prvni rubrice. Ostatni tidaje jsou nepFipustné. ‘ 
“Sieg a a Zhawend k1icové slovo CHECK(BY) zapsané na sekundarnim radku s indikatoren, , 
2adino oun nyu typu dat se vztahuje na vSechny typy dat kromé P a B. S témito typy smi byt 
re kli€ové slovo ARRATR. 
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Prikazy pro popis tabulky slouzi k pojmenovani tabulek ak urCeni délky jejich Polozek, Tay). 
kové polozky mohou byt bud znakové, nebo ciselné, ale ne oboji. Data se do tabulky dostavaji bud Wii 
prekladu (prikompilované tabulky), nebo pri vypoctu (z datovéeho souboru), 

Prikazy pro popis tabulek musi ndsledovat za piikazem pro Popis souboru, ktery obsahuje taby]- 
kova data. Takovy soubor nesmi obsahovat jind data nez tabulkova a vsechny tabulky v soubory us} 
obsahovat stejny pocet polozek. Jestlize soubor obsahuje vice nex jednu tabulku, obsahuje kazdy 2- 
znam po jedné polozce z kazdé tabulky. Jestlize soubor obsahuje nap. tri tabulky A; B, C, zéznaty 
budou obsahovat tyto polozky: 


1, zaznam: 
2. zaznan: 
atd., az 

n. zaznam: 


A1,B1,C1, 
A2,B2,C2, 


An,Bn,Cn, 


Tabulkovy soubor nesmi byt prifazen zarizeni klavesnice/obrazovka, tiskarna a komunikaén, 
linka. 

Poznamka: Pojem "tabulka", tak jak se uziva v jazyku DE/RPG, je shodny s pojmem "Vektor® 
(array) z jazyka RPG IT nebo RPG IIT. Pod ndzvem "vektor" se proto pouziva také ve formulati C 
v jazyku DE/RPG. Obdobné je pojem “tabulkova polozka" shodny s pojmem "prvek vektoru”. 

Rubriky, které se pouzivaji v prikazu pro Popis tabulky, jsou vyznaceny jako neSrafované m 
obr. 5.15. 


[oonetenannencnpamnnannnpapenwnnenn7annyannen: 


| Indikator [| if || 


feieieel teetetaitaen renter 


{ | Dalsi funkce 


ener pened 


Formu- souboru/ 
lar zaznamu/ 


esetinna ] ADD DSPATR LOOK SEQ SUBST 

mista | ARRATR EDTCDE PNT © SETOF TADD 

ss fe | a AUXDUP ERROR RANGE SETON TSUB 

Typ dat] T AUXST EXSR  RANGET SHIFT XCHK 
asl y a COMP INSERT RESET SUB konstanta| 


i 
| (CHECK,ERROR)| Typ | | Uziti fen mecnaimenencnssanesebe: 
wmawwnewny |Pozice 
Jnéno D 
|| 


Délka} k CHECK(AD AS BC BV BY DD DR FE Gxx + 
LC ME MF Mxx RB RL RZ) 

ji] ____.6) sobhe <7) meee 

4567890 1234567890 1294567090 


Do této rubriky zapigeme pismeno A. 


5.4.3 Typ_jnéna_(sloupec_17) 


Do této rubriky zapigeme pismeno T. 
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a 2%) 
Do této rubriky zapiSeme jméno, které jsme urili tabulce. Jména nesmi zacinat pismeny TAB 
a nesn{ byt delsi nez 6 znaki. Kazdd tabulka musi byt pojmenovana. 


Do této rubriky zapiseme délku tabulkove polozky Vv poétu znaki nebo Cislic, (VSechny tabulkove 
poloéky maji tutéz délku.) Zapis délky je povinny. i : 

Délkovy tidaj musi byt zarovnan k pravemu okraji rubriky a smi obsahovat vedouci nuly nebo me- 
zery, Ciselné polozky nesméji byt delSi nez 15 Cislic a znakové delSi ned 256 znakd, 


S.Aub Desetinnd wista (sloupec 37) 


Tato rubrika uréuje typ tabulkovych polozek (znakovy nebo ciselny). Zdstane-li rubrika nevy- 
plnéna, jsou polozky znakové. Zapisem Cislice 0 az 9 urcujene pocet desetinnych mist Ciselnych 
polozek. 


[Pinosenensenentnentennnyoypeemennen|aee pane reef anienwanpaennenennenneenmeneen 

Indi kator {| | | Dalsi funkce | 

(CHECK, ERROR)| — Typ | Uziti [pennnnnnnectnennnnnnnnecmnnmnnnnnnned 
jména ewmeweney |Pozice | 


eee 


( 
| Poznanka| | | | Jnéno | | Desetinna | | { ADD  DSPATR LOOK SEQ —supsT | 
| | | i ARRATR EDTCDE PNT © SETOF TADD | 
souboru/ AUXDUP ERROR RANGE SETON TSUB 

AUXST EXSR  RANGET SHIFT XCHK | 


COMP INSERT RESET SUB konstanta 


CHECK(AD AS BC BV BY DD DR FE Gxx + 
LC NE MF Mxx RB RL RZ) 


Obr. 5.16 


Wsvétlivky k tabulce: 


“Ting vd Aabutce jméno ATABUL. Tato tabulka obsahuje Sestimistné Ciselné polozky s dvéma dese- 

nyai misty. 

Bt polozek této tabulky musi byt uréen klicovym slovem NUMENT v pFikazu pro popis souboru, 
terénu je tento prikaz podtizen. 


55 Pike oro konstantu 


i “aap Slouzi ke specifikaci a umisténi znakové konstanty pro vystup na libovol- 
: sransakcniho souboru. Pred prikazy pro konstantu musi Podobné jako pred prikazy 
Pro popis Pole, predchazet prikaz pro popis wisieers d 
penne Na souboru s klavesnici a obrazovkou - DEVICE(CRT), jsou zobrazeny na obra- 
nou $2 soutasti disketového zéznamu, 


Rubri é Beaecrvcee Siete, Fe 5 5 
ku un Které se Pouzivayi v prikazu pro konstantu, jsou vyznaéeny jako neSrafované na abraz- 


Formular A 5-41 


[rote enn cnn yroten neg nya meen en yn ee po eeeneeeemnne: 


2 ig 1 apa: 
Indikator | | | DalSi funkce 
(CHECK ,ERROR)| Typ | Uziti | — 
jmena wemewewen, |Pozice 
Desetinna ADD  DSPATR LOOK SEQ SUBST 
mista | ARRATR EDTCDE PMT  SETOF Tapp 
72] AUXDUP ERROR RANGE SETON TSUB 
Typ dat{ { {| AUXST EXSR — RANGET SHIFT XCHK 
litoh COMP INSERT RESET SUB  konstanta 
| {| [B}Ra-}s1. 
Délka 9/u|dek 


Tyrese | P 
Poznamka Jméno 
souboru/: 
zaznamu/ 
pole/ 
tabulky 
CHECK(AD AS BC BV BY DD DR FE Gx + 
LC ME MF Mixx RB RL RZ) 
a ee 
957890 1234567890 1234567890 1234567800) 


90} 123454 
/ 


Obr. 5.17 


i (Sloupee 1 a 15) 


Do této rubriky mizeme zapsat poradové Cislo prikazu. 


Tato rubrika plati jen pro soubory na klavesnici a obrazovce - DEVICE(CRT). V tom pripadé do ni 
musime zapsat pismeno 0 Znamenajici vystupni data. 


5.5.4 Pozice (sloupce 39 az 44) 


Tapisem v této rubrice ur€ujeme pocateéni pozici pole na obrazovce nebo v zdznamu jiného zz 
rizeni. Pro obrazovku plati déleni rubriky “Pozice" na rubriky "Radek" a "Sloupec". Pro zaznamy M 
astatnich zarizenich se pouziva rubrika "Pozice" jako celek. Zapisy v rubrikach musi byt Ciseln 
@ Zarovnané k pravému okraji. 


Obrazovka. Zapis v rubrice “Radek* (sloupce 39 az 41) uréuje cislo Fadku obrazavky, na nenz ma by! 
pole zobrazeno. Zapis je cislo, kterése vatahuje x Udaji z kliového slova ‘SLNO v pfikazu pro 
vstupni format (formula? Z), Cislo Fadku zadané v klizovéw Slové SLNO (pop?. standardni hodnota %, 
Meni-li zadano) se povazuje za zaklad, k nému se pricte zépis z rubrixy "Radek" zmenseny ole 
Vysledek je Cislo Fadku obrazovky, fa némz se Pole zobrazi. Nejvy$Si Cislo, ktere takto vznikne, 
Mesm) byt vétsi nez Cislo posledniho Fadku obrazovky, Zapis v-rubrice "Sloupec” (sloupce 42 az 4) 
urcuje sloupec abrazovky (pozici y Fadku) pocitany od i do-80, 

Neni-li pozice pole zadana (rubriky "Radek" a "Sloupec" zistaly prazdné), dosadi se standardel 
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grvni volna pazice za posledné defirovanym polea. Standardni 


pozice 
pozice ~ : 

ek 2, sloupec |. 
Bez ohledu na i é 
aby fadek urceny pro napovedi nemohl oy 


je nekteré nejdilezitéjsi! kombinace zapisi. 


to, zda je Ci neni zadano xlicove slovo SLNO, jsou standardni 
arepsan obsahem Zadného pole, 

tak, 
ukazu 
[riséove 
| slovo 


wone enon nym 
Zapis | vysleany 

vrubrice | Facek 
"Radek* fo | 
Wwezadan 
Nezadano 

Nezadano 

|Nezadano 


| 
1 
j 
1 
| 
| 
| 
\- 
1 
' 


SiNO() 
SLNO(I 


"Fozice" uréuje pozici 
Citanou od | do delky zaznamu. 
Neni-li pozice zacana (rubrika “Pozice” zistala or dna,, dosadi 
volnd pozice za posledné definovasym colem. Standardni sozice prvyni 


pole 


poli 


Do této rubriky zapiSeme znakovou konstantu, tj. znaxovy retézec - text - uzavreny v a 


feth, Ne-li byt soucdsti textu apostro{, musi byt zdvojen. 
Ke konstanté mize ayt dopIneéno klicové slovo DSFATR, popsane v odst. 5.3.10. 


Formular A 


je: Fa- 


voleny 
aoulka 
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6. Formula? C 

| (CHECK,ERRGR)| Typ | 

| yména 

| Poznamk Af z 
| 


souboru/ 
zaznamu/ 


ADD 2SPATR LOOK SEQ 

| ARRATR EDTCDE PAT — SETOF 
eenynmd AUXDUP ERROR RANGE SETON 
| ALXST EXSR — RANGET SHIFT 
| | | pie INSERT RESET 3UB  constanta 


Ve formular'i C mohou byt zacany - prikazy pro vstupni/vystupni Operace, prikazy pro manipulaci 
sdaty a dali prikazy. Tyto prikazy jsou vyorany ze souboru prikazd PouZivanych v jazyku RPG III. 

Ynohé z prikazi mohou byt provedeny na datovycn tabulkach. Datove tabulky se popisuyi na formu- 
lati A pomoci prikaz pro popis tabulek. Pojmy “tabulka" a "Vektor® jsou shodneé, rovnéz tak pojmy 
"taulkova polazka" a “prvek vektoru". Bh (oes 9 

Formula C pouzijeme tehdy, potfebujeme-1i Zadat nejake operace, které nenizene vyjadrit na 
forslati A. Operace se zadava}i ve forme prikazd Seskupenych do podprogramd. Tyto podprogramy 1ze 
wwolavat z programd pro porizovani dat (zapsanych na formulaFich Za A) nebo monou oyt or ganizova- 
ny tak, aby Fidily interaktni nebo davkove Zpracovani dat. 4 , ‘ 

Prikazy formulare C - tzv. vypocetni prikazy - sou pro prehlednost rozclenény do nekolika ka- 
tegorii: 


CS aeons = _ 
i 
{ 
{ 
i 


| JByRa-{S2 
j CHECK‘AD AS BC B 
LC ME MF Mixx RB ORL RZ) 


> i> Pie i> ior 


~ Tafitek a konec podprogramu, 

~ Provedeni podprogramu, 

= Skokové prikazy. : : 
= Vyvolani podprogramu vzniklého prekladem z jazyka BAL. 
- Arituetické prikazy. 

~ Porovnavaci prikazy. 

- Presunové prikazy. 

- Bitové prikazy. 

~ Hledini v tabulce (vektoru). 
~Prikazy vstupu a vystupu. 
~Nastaveni indikatoré, 


ee 


VSechny pFikazy foreulafe C musi byt organizovany do podprogram’. Kazay podprogram musi zaci- 
fat pricazem BEGSR, ktery oznacuje vstupni Dod, a koncit prikazem ENDSR, Kterym vypotet opousti pod- 
program. Jakuile vypocet opusti podprogram, Pokracuje tesné za operaci, «tera podprogram vyvolala, 
Kaidy prikaz gusi byt zahrnut pravé v yednom padprogramu. Podprogramy nesmé)i byt vkladany do sebe, 


6.1 Pravidla 


" 


Tpdsob zipisu do uréitycn rubrik formlare C je stejny bez ohleau na typ operace. Jsou to tyto 
rubriky: 


Do této rubriky mizeme Zapsat poradové Cislo prikazu, 


4.1.2 Formula 


Do této rubriky zapigeme pismena C. 


S13 Fotainky (sloupce 


a teto rubriky mohou byt zapsany az t?i podminky, které is0u mezi sebou vazany vztanem "a". 
MY podminky musi byt splnény, ma-li se prikaz zapsany v tomto radku vilbec provest. Podminky se 
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opis jazyka Formular C - vypocty 4-1 


k 9 az Il, 


pismenem N a druhé dva slau 


zadavaji 
loupec kazde z nich slouzi k vy 
(01 az 99). 
Ke splnéni celkove 
ty. Nemi-li nektera z podminex sp 
F ami mohou byt vazany vsi 


4a 15 az 17, Prvni 
Pro Zap1s indikatory 


podminky musi byt pri vypi indikatory bez N nuty, 
na, prikaz se neprovede. 
nny prikazy formulare C, kromé BEGSR, ENDSR, 


indikatory § N wo 
TAG, PLIST a Pay, 

ichZ nemaji smys!. 
Neni-li zadana Zaana pedminka, prikaz se provede vzdy, dospeje-li « nemu vypocet, 


TASTacrweneweweyousensanaeyauanazeneanaense7oneaemeneanayevanansnaapeumenanne ecmnon, 
i ] | wsiee |] | 
Podminky | neannenmenned 1| Vysled. | 
Des.mista INdik. 
Jevepenepeeed etn tan bent 
a a | oper | Del} || [+ J- jo 
fo-~frontone] [Jméno ue rie se | 
re aaa 


Poznamky 


6 


ju Zapnuty a in- 


teto rubriky musime zapsat zkratku operace (aperacni kod), ktera se ma podie prikazu pro- 
15 1 v2 Sloupci 28, 


olny text, zvJ v }ici imky. . Prekladac tente 
amky mohou byt radku, ktery 


podprogra 


nebo xonec..jineh 


}Sou povinné. Mezi 
Za, koncee 


at : podprogramu, 
podprogramu a zacathem podo heen ab ea eae 
pov = ma fet Zadny prikaz kromé poznamkoveho. Operacni zna- 


ky prikazd sou tyto: 


BECSR- a vstupni bod 
BECS atek a vstupni bod 


a poderagramu (veginning 
ENDSR a 


f subroutine = zacdtek podprogramu), 


upni bod podprogramu (end of tine - konec podprogramu). 
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2. operand | Vysledek Vysledkove 
indikatory 


ecerecfemnnnnnn|mmeeneennn fen nnnnnnnnfnnnenemnnnnd 


Povinny 


a a 


{, operand urtuje jméno podprogramu. Jméno musi zacinat ve sloupci 18 a mize byt dlouhe az & 
zit, Toto jméno se pouziva v klicovém slové EXSR na formulari A, v prikazu EXSR na formulari C 
anisto jpéna formatu v prikazu pro vstupni format na formulari Z, 


2. operand | Vysiedek weledkové | 


indikatory | 


a re 


Ce 


1, operand | Operace 


Nepovinny 


a 


1. operand je nepovinny. Pokud ye zapsdn, musi mit tvar jmena diouheho nejvyse 6 znaki a musi 
tyt zarovnan k levému okraji rubriky. Slouzi jako navéSti - cilova adresa - pro skok z jiného pri- 


tamu uvnit? podprogramu. 


TY ES YO Pe eaten ey 

[| | | Vysledek | | | j 
Formu-] | Podminky | | nae | 
{la | | | | Des.mista indik. 


eagiiasa 


a 200 


=| 


Sere oy 


Poznamky 


fs 


(execute subroutine - provést podprogram), ktery pozastavi 
@ Zahaj} provadéni jiného podprogramu (vyvola jej). Po provede- 


Podprogrami pokratuje vypatet dalSim prikazem pazastaveného AvyVatavayaciha) 
Podprogramy (za Prikazen EXSR) ! <a f 


Podprogran vyvola 


ny prikazem EXSR mize vyvolat jiny podprogram (take prikazem EXSR) atd. Je 


Formuiar C - vypocty 6-3 


vsak treba davat pozor na to, aby pri tom nebyl vyvolan néktery Z pozastavenych podprogrand, Poza- 
staveny podprogram je ten, ktery vydal prikaz EXSR, za néjz se vypocet jesté nevratil, Podprogras 
nemize vyvolat sam sebe. 


Sp tee Vase erat cnn > fame a 


Podminky | 1. operand T Operace | 2. operand | Vysledek 
| 


Vysledkave 
| indikatory 
1 a al leach aac aah Peel ma 

| Povinny | 


2. operand je jméno padpragramu, ktery se mi provést (vyvolat). Totez jméno musi byt Zapsano 
v 1. operandu nékterého prixazu BEGSR. Jmeno musi zacinat ve sloupci 33. 


| | | | | Vysledek 
fewaveneenene] | Vysled. 


aa Yomannnannnn ponancnenanpannenpaannnnnaanpenensnannnang~7eneanuanponennennannececer 
iT 
= { 
Des.mista indik. { 


9 


eee pe Poznanky 
race | operand 0 


Vysvétlivky k obr. 6.3: 


~ Prikazy se provadéji v tomto poradi (podJe poFadovych cisel): 
10, 30, 60, 90, 50, = 


6-4 Skokové_ptikazy 
Skokové prikazy davoluji zménit pFirozené poFadi, v nami se Provadéji prikazy podprogramu (tj. 


tee némz jsou zapsany). Vypocet prejde na uréené misto v Podprogramu. Operacni znaky prikazi jsou 


ore - prechod vypoctu (skok) na misto urcené navéestim v prikazu TAG nebo ENDSR, 
~ Mavesti, na nézZ ma prejit vypocet podle prikazu GOTO nebo CABxx. 


Poznamka: Do této kategorie pat?i zéasti i pri 2 Sak kapi- 
tole 6.7 "Porovnivaci titan Prikazy CABxx, které jsou vSak uvedeny v podkap! 
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Operace | 2. operand | Vysledek | Vysledkove 
indikatory 


GoTo Povinny 


Prikaz GOTO (go to - jit na) zpisobi precnod vypottu na navest i urcené 2. operanden. Toto na- 
vééti musi byt uvedeno v jedinén prikazu TAG, pop. ENDSR tehoz podprogramu. Prikaz TAC mize byt 
én pred nebo za prikazem coro, prikaz ENDSR jen za nim, — ; ae ; 
V2, operandu musi byt Zapsano jmeno navesti, na néz ma vypocet prejit. Jméno musi byt dlouhe 
rejyjse 6 znak a musi zacinat ve sloupci 33. 


oe 
1. operand | Operace | 2. operand | Vysledek | Vysledkove | 
indikatory 


Povinny | 


we pececeenanne: 


Jedinou funkci prikazu TAG (tag - znacka, navéSti) je poskytnout navésti pro prikaz GOTO nebo 
(Box, Prikaz TAG nendze urcovat vstupni bod podprogramu. 

V1, operandu musi byt zapsano jméno, které piredsiavuje navésti a které je pouzito alespon 
V jedné skokové instrukci (GOTO, CABxx). Musi byt dlouhé nejvyge 6 znaki a musi za¢inat ve sloupci 
18, Toted jaéno nesmi byt pouzito ve vice nez jednom prikazu TAG v celén zdrojovem programu. 


Obr. 6.4 


Formular C - vypotty 6-5 


Podprogramy napsane v jazyku BAL dovoluji pouzit tech funkci zaFizeni Consul 2715, ktere Ne }sou 


dostupné prostrednictvim jazyka DE/RPG. K pouziti takovych podprogrami slouzi tyto prikazy: 
CALL - vyvolani BAL-podpragramu, 
PLIST - identifikace seznamu parametri pro BAL-podprogram, 
PARM - definice parametru pro BAL-podprogram. 
CALL 
eweewnacen: ee eeenenynnnenn enn peenen nnn nnn panenennneen yee enn nnnne 
f Podminky if « operand | Gperace | 2. operand | Vysledek Vysiedkove 
indikatory 
a Seen os memana pan annawensnntacenamanece}amenasenenen, 
pa | CALL | Povinny | Nepavinny L | 
ee See, ae, oo 


Prikaz CALL (call - volat) vyvolava podprogram vznikly prekladem z jazyka BAL. Tento podprogram 
se pripoji k prelozeném: programy béhem prekladu prekladacem DE/RPG. Musi byt predem prelazen 
prekladacem jazyka BAL a umistén na téze disketé, kde je ulozen zdrojovy program v jazyku DE/RPG. 

V DE/RPG-programu lze pouzit az 16 BAL-padpragrami. 

2. operand je znakova konstanta predstavujici jméno volaného podprogramu, tzn., ze jméno je 
umisténo v apostrofecn a smi oyt dlouhé nejvyse B znaki. 

Vrubrice  "Wysiedek" lze zadat jmeno prikazu PLIST, ktery oznacuje zacatek seznamu paramet- 
rd pro podprogram. Rubrika zistane prazdna, jestlize podpragram nepot/ebuje zAdné parametry nebo 
jestlize prikazy PARM nasleduji bezprostredné za prikazem CALL. 

Dalsi informace o podprogramech psanych v jazyku BAL jsou uvedeny v kap. 11. 


 iieheenaes teed eeestetenieieee Sieteieennens: Smee Semememeene iemmmmmmmne te teamenemen aeemmmemmememmamenenan | 


| | | | Wsledek | | | | 
Formu-| | Podwinky | hea Vysled. 
lar | Des.mista indik. 


DB. oo ot or Poznamky 


operand | Delf || {+ i- fo | 
|Jnéno [ka |9|Hb-=$= 


frmmny | feeetemete—f i. [Ope 
aoa Hess race 
Cc 


fovefennfome 


ike 
118 


Vysvetlivky k obr. 6.53 


~ Prikaz CALL vola podprogram PODPRB a predava mu seznam parametrd obsahujici pole POLE! a POLE2. 
Tato pole musi byt v program definovana na jiném misté. Podprogram PODPRB se provede s vyuzitin 
obsahu poli POLEL a POLE2 a pak vrdti vypotet na prvni vykonny prikaz za poslednim prikazem PARM. 
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PLIST 
operand | Vyslecek | Vysledkove | 


Podiinky | 1, operand 
indikatory 
| Pavinny | PLIST L | cn | 


Prikaz PLIST (parawetr list ~ seznam parametrd) oznacuje zacatek skuoiny oF 
predstavuji parametry pro BAL-podprogram. Jméno pi'ikazu PLIST zapsane v 1, ‘saan es tie 
dito alespon v jednom prikazu CALL v rubrice "Wsledek". Prikaz PLIST fasledovany pirikazy PARR 
adie byt san Kdekoliv v rémci podprogramu BEGSR - ENDSR a neni nutné jej presxakovat itkazed 
GOO, Za prikazea PLIST musi nasledovat alespof jeden piikaz PARM. Prixaz CALL, itery se na prik 
PLIST odvolava, mize byt zapsan i v jiném podorogramu nez prikaz PLIST. é ‘cai se 

1, operand obsanuje jméno prixazu PLIST, které smi byt dlouhé nejvySe 6 znakt a musi zacinat 
ve sloupci 18, _ es 


Operace 


See eee eis fete 
| { | | Vysledex 
| 

| HS {Ope- 2. 
operana es operand 


Obr. 4.6 
Wsvetlivky k obr. 6.6: 


= Pilar ci f rah 
az CALL vol podprogram PODPRBAL a dava mu k dispozici data v polich CASTKA a PRIZN, 


aie eee 


Operace | 2. operand | Vysledek 
| 


3 Sea 


ee 
Vysledkove | 
indikatory | 


1. operand 


Prikaz PaRH 
fan, Kady Beat oer ~ parametr) slouzi k definovani parametrd, které vyzaduje BAL~podprog- 
vat 2a OF ikazem plist sean Sanostatnym prikazem PARM. PFikazy PARM musi bezprostfedné nasle- 
nebo CALL v poradi a poctu, jak to vyzaduje BAL-podprogram. Prvni prikaz 


Tiny nee PARH ukane 
‘ ne 5 . 
Stalovat tilazes oto seznam oarametri. Podobne Jako u prikazu PLIST neni nutne prikazy PARM pre- 
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Rubrika "Vysledek" mus) oosahovat jmeno pole neho taoulky. Jméno tabulky mize byt doplnéno 
konstantnim indexem (poradovym cislem), ktery urcuje tabulkovou polozku. Pole a tabulky mahou byt 
znakove nebo Ciselne. Do rubriky "Vysledek" nesmime zapsat konstantu. 

Pristup k parametrdm v BAL-podprogramu je popsan v kap, 11. 


Aritmetické prikazy operuji jen's ciselnymi daty. VSechny berou ohled na potet desetannych 
mist a znaménko. Jestlize vysledkove pole (proménna) neni dost dlouhe, aby obsahlo vysledek ape- 
race, zayovna se vysledné Cislo podle desetinnych mist doprava a prebytecne Cislice zleva se ztra- 
ti. Je-l1 vy rubrice "Vysledek" zadéno méné desetinnycn mist, nez )ich ma vysledna hodnota, prebytec~ 
na desetinnd mista vpravo se ztrati. Jestlize je vysledkove pole deli nez vysledna nodnota, dopini 
se (po zarovnani desetinnych mist) zleva potrebny pocet nul. Ztrata prebytecnych Cislic nejvyssich 
Fadi (ami ztrata prebytecnych desetinnych mist) neni nijak indikovana a nelze ji programove ojet- 
Fit. Delky poli a proménnych by mély byt navrhovany s ohiedem na tuto skutecnost. Do kategorie arit- 
metickych prikazd patri tyto operacni znaky: 


ADD - scitani, 

T-ADD —-- pfesun cisla se steynym znaménkem, 
SUB ~ odéitani, 

T-SUB- pfesun Cisla s opacnym znamenkem, 
MULT ~ nasobeni, 

DIV ~ déleni, 

MVR ~ presun zbytku po deleni. 


ADD 


 iseiaielieiaie Saieeneensientets iasiatemieates tateaeamemetes renee ooo 


Podminky | 1. ooerand | Gperace | 2, operand | Vysledek | Vysledkove 
1 


2 

: indikatory | 

H 

jpveonecwwefunnnnneoneenfercnennnefrennnonennennennneenefone Hy 
|Nesovinné | Povinny s| 0 | Povinny | Povinny Nepoyinné | 


Prikaz ADD (add - pricist) priéte absah 1, Operandu k obsahu 2. operandu a soucet ulozi do pro- 
manné udané v rubrice "Vysledek", 


SSMU (nee aac races (ase Weledkave | 


Podminky operand | Operace | 2, operand | Vysledek Vysledkove 
indikatory | 
Nepovinné 7-ADD Povinny Povinny Nepovinné | 


Prikaz Z-ADD (zero and add - nulovat a pricist) pricte operand k nule a sou¢et ulozi do pro 
menné udané v rubrice "Wsledek". Slouzi k presunu Ciselnych tidajd z jedné proménné do druhe se 
zachovanym znaménkem, 
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a 
nececenngemeneenncnnnpuananamenyannasananite pene eanann | amen 
Prcininly if {. aperand opeace | @. operand | Vysledet Vysledkové | 
| | indikatory | 
os a are aie 
fewine Povinny SUB zp feetipoy [ Povinny Nepovinné | 


Prikaz SUB (subtract - odecist) odecte 2. operand od 1, Operandu a rozdil ulozi do proménné 
wdané v rubrice "Wysledek". 


1 


Ss as Se 
| Podninty | 1, operand | oerace | 2. operand | Vysledek | Vysledkove | 
indikatory | 


cacnnfameenenennnfannennenntnnenmennnnnnfemnnenennafinenrcencey, 
Nesovinné | | Z-SUB | Povinny | Poviany Nepovinné 
la aa Barton ars) enevingha| 


Prikaz Z-SUB (zero and subtract - nulovat a ade¢ist) odecte 2. operand od nuly a rozdil ulozi 
do pronénne udané Vrubrice "Vysledek". Slouzi k presunu Ciselnych Udajd z jedné proménné do druhe 
§ opacnym znaménkem. 


WAT 
Sroerensayacaaenanaanyaeeausenapeemensenenanyannancceeenpann 
[rei 1. operand | Qoerace | 2. operand | Vysledek Vysledkave | 


indikatory | 


oeneennnenn: 
Nepovinné | Pavinny MULT Povinny. Povinny 


cas li! ela tg 


(Prikaz MULT {multiply - ndsobit) vyndsobi 1. operand 2. operandem a soucin ulozi do proménné 
wdané V rubrice "Wsledek", 


wy 


Podninky | 1, operand | Operace 


— Garand aGaisaenenl yc PRT 


operand | Vysledek | Vysledkave | 


oe — | t indikatory 
Nepovinné ree aoa men mene beret in een arene one 
min | Pv nV [roo { Povinny Nepovinné 


mee ene cen dre ce ene een dh en ease ees eres ee 


Prik; i ys yay ° P 
az DIV (divide - delit) vydéli 1. operand 2. Qperandem a podii ulozi do proménne udané 


Vrubrice "yy, " Ahi 
‘ Wsledek", 2, operand nesmi byt nulovy. Zbytek po déleni se uschova pro pripadné pouziti 


Vnésledujicin. pFik j j j 
fia eegettkazu AVR, Nasleduje-1i  bezprosttedné za prikazem DIV prixaz NVR, nesai Be el 
wyolnéna rubrika "Taokrouhleni". 
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AYR 


=r 


a ae ot 


Podminky | 1. operand ] Operace 


operand | Vysledek Vysledkove 
indikatory 


=" ae 


Nepovinne | mR i Povinny | Nepovinnée | 


be RS 2 Wd ed a Ma A 


Prikaz MVR (move remainder ~ presunout  zbytek) presune zbytek po déleni prikazem DIV do pro- 
menné udané v rubrice "Wysledek". Je-1i pouzit, musi bezprostredné nasledovat Za prikazem DIV, Rub- 
rika "Zaokrouhleni" musi zistat prazdna. Zbytek po déleni je definovan takto: 


zbytek = délenec - (délitel x podil). 


6.6.1 1. operand (sloupce 18 az 27) 


V rubrikéch "{, operand" a "2. operand" mohou byt u aritmetickych pfikazd zapsany tyto Udaje: 


~ Giselna konstanta, 
- jméno Ciselného pole, 
> oznaceni orvku Eiselného vektoru. 


Ciselna konstanta se sklada z islic, pFipadné desetinné teCky (Garky) a pripadného znaménka 
(+ nebo -). Znaménko se zapisuje tésné vlevo pred prvni Cislici. Ciselnd konstanta maze obsahavat 
nejvySe 10 znaki véetné desetinné tecky (Gdrky) a znaménka. Tvar ciselné konstanty je popsan také 
v odst, 3.2.5, 

Oznateni prvku vektoru musi byt zapsano Jako dvojice ddaji oddélenych éarkou bez mezer. Prvni 
Udaj je iméno vektoru, druhy lidaj ie index ili pofadové Zislo prvku vektoru. Index mize byt bud 
konstantni nebo praménny. Konstantni index se Zapisuje jako celé Cislo (bez znaménka), proménny jako 
iména pole. Toto pole musi byt ciselné bez desetinnych mist a musi byt definovano v Programu. Jména 
a Cisla musi byt volena tak, aby se oznateni prvku vektoru veslo do 10 pozic rubriky. 

Zapisy do rubrik musi dyt zaravnany k levému okraji (i ciselna konstanta). 

Obsah oromennych (n0li nebo orvkd vektor’) se Provedenim prikazu nezméni, pokud neni tata? pra- 
ménna uvedena také v rubrice "Vysledek", 


6.6.2 Weledek (sloupce 43 az 52) 


VSechny aritmetické prikazy vyzaduji zapis do rubriky "Vysledek", kterd se déli na rubriky 
“Jngno", "Délka" a "Desetinnd mista”. V rubrice "Inéno" (sloupce 43 az 48) musi byt uvedena Ciselna 
proménna: 


~ jméno Ciselného pole definovanéno jinde v programu, 
~ jméno nového éiselného pole, 
~ oznateni orvku ¢ciselného vektoru. 


Wysledek aritmetické aperace nahradi cely predchozi obsah proménné uvedené v rubrice “Vysle- 
dek". Protoze se data zarovnavaji na stanaveny poéet desetinnych mist, mize dojit na levem nebo 
Pravem konci vysledku, poo?. na abou jeho koncich, ke ztraté €islic, ? 
j Oznaceni orvku vektoru musi byt zapsano jako dvojice Udaji oddélenych éarkou bez mezer. Prvni 
udaj je jméno vektoru, druhy je index €ili pofadove Cislo prvku vektoru. Index mize byt bud kons- 
tantmi nebo proménny. Konstantni index se zapisuje jako celé Cislo (bez znaménka), promenny index 
jako jméno pole. Tato pole musi byt definovano v programy jako Ciselné bez desetinnych mist. Jména 
a Cisla musi byt volena tak, aby se oznaceni prvku vektoru ve5lo do 6 pozic rubriky. 

Zapis misi zacinat ve sloupci 43, 


Obé rubriky, “Délka" (sloupce 49 az 51) a "Desetinna mista" (sloupec 52), musime vyplnit tehdy, 
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jestlize jsne do rubriky "Jnéno" Zapsali jméno pole, které neni definovano jinde v program, Jest- 
lide vyplnine tyto rubriky iv jinych pripadech, musi byt Udaje 0 délce a desetinnych mistech shodne 
s teni, Které jsou zapsany v jine definici tehoz pole, popr. v definici tabulky (t}. vektoru), 

Dalka vysledkove oromenne nesmi presahovat 1S Cislic. Pocet desetinnych mist musi byt vy jadren 
islicl 0 a& 9; nesmi vSak pFekrocit délku (celkovy potet €islic). Delkovy dda} musi byt v rubrice 
zarovnan ypravo. 


Do této rubriky zapiSeme pismeno H (half adjust > upravit polovinou), chceme-li, aby vysledek 
tyl po provedeni aritmetické operace 4 Zarovnani — zaokrauhlen na poslednim misté vpravo. Zapis neni 
povolen v prikazu DIV (déleni), za nimz bezprostfedne nasleduje prikaz MVR (pFesun zbytku), 


ani 
V pikazu NVR. Nechceme-li vysledky Zaokrouhlovat, ponechame rubriku prazdnou. 


bibs Wsledhové indikatory (sloupce 54 az 59) 


Tato rubrika slouzi k zachyceni znaménka vysledku aritmetické Operace prostfednictvim indika- 
ford, Deli se na tri rubriky: "Plus" (sloupce 54 az 55), "Minus" (sloupce 56 az 57) a "Nula" (sloup- 
ce 8 a2 59). Do xazde z téchto rubrik ze zapsat indikator 01 az 99, 

Indikator zapsany v rubrice "Plus" se zaone, je-li vysledek operace kladny (vétSi nez pula), 

Indikator zapsany v rubrice "Minus" se zapne, je-li vysledek operace zaporny (menSi nez nula), 

Indikator zapsany v rubrice "Nula” se Zapne, je-1i vysledkem operace cislo nula. 

Stejny indikator mize byt zapsan nejvyse ve dyou rubrikach. 

Po provedeni aritmetické aperace a Pripadném zaokrouhleni se ySechny vysledkove indikatory nej- 
eve wypnou a Pak se zapne ten, ktery Odpovida vysledku operace. 

Indikatory zapsané v této rubrice lze pouzit k podminéni jinych zvolenych prikazd, u nich? 1ze 
taal podainky v rubrice "Podminky" . 
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Vysledky: 


wa nnnnnnnnyoeneennn=e==7: ag Nabhan >, 
aa en nen qnn penne name nn ynnne nee enn panne= 
ee | re ee | a 
| Vysled. 
core Podminky | tt r Des. “ao | indik. | , : | 
S erewneynnny0| frmymnya=: oznamky 
thee oe se Ope- dio ei beeses pera OW ienver 
Te el ceeteas eee aie ten A al 9H rt 
|Jmeno is rb apne =A | 
> |< fe ares | 
= 


Vysvétlivky k obr. 4.7 


~ Poéateéni hadnoty proménnych jsou tyto: 
= 001 


0 

ria 

76 

- Stoji za povSimnuti, ze délka a pocet desetinnych mist kazdé vysledkovée proménné jsou zadany jenoa 
jednou. 


‘a 
4 
B 
c 
c 
J 
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4,7 Porovndvaci_prikazy 


Prikazy této kategorie porovnava i 1, operand s 2. aperandem a podle vysledku porovnani nastavi 

sjsledtové indikdtory, popr. jest@ provedou skok na urcené navésti. Znakova pole se Porovnavaji zna~ 
a Giselna algebraicky. Porovnavaci prikazy maji tyto operacni znaky: 

1 


(OP © - porovnani (compare - poravnat), 

CAB = porovnani a bezpodmineény skok (compare and branch ~ porovnat a vétvit), 
CABEO © - porovnani a skok, je-li 1, operand roven 2, operandu, 

(ANE © porovnani a skok, neni-li 1. operand roven 2. operandu, 

CALE = porovndni a skok, je-li i. operand menSi nebo roven 2. operandu, 

CABLT - porovnani a skok, je-li 1. operand menéi nez 2. operand, 

CABGE = porovnani a skok, je-li 1. operand vate; nebo roven 2, operandu, 

(AKT = porovnani a skok, je-li i. operand vats; Nez 2. operand. 


iS 


[rsceenenpemeenenecnmey. | Senet eseaemnas ere 
| Podsinky | 1. operand | Operace | 2. operand | Vysledek | Vysledkove | 
indikatory | 


tet pe te 


WNepavinné | Povinny | COMP Povinny Povinne 


ae ee 


Prikaz COMP (compare - porovnat) PO porovnani operand’ Jen nastavi vysledkove indikatory. Po 
tit se provede dali ofikaz v poradi. 


a 
| SO eumeeeeee seamen SS Eo 
[eae 1, operand | Operace | 2, operand ysledek Vysledkove | 
indikatory | 
ee beleetees peeecs | 


y | CAB | Povinny — | Povinny Povinné ] 
—. a a Oe 


a ee CAB (compare and branch - porovnat a vétvit) PO porovnani operandi nastavi vysledkove 
Mlatory a provede skak na navésti zapsané v rubrice "Wysledek", 
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CABxx 


| Podminky ie aperand | Operace | 2. operand Vysledek 


VWysledkove 
indikatory 


Nepovinne 


a ns a a 


[teres nneé | Povinny CABxx Povinny 


Prikazy skupiny CABxx, kde xx je relacni znak (EQ, NE, LE, LT, GE, GT), PO poravnani operandi 
nastavi vysledkové indikatory (jsou-li n@jaké zapsany) a podle vysledku poravnani bud provedou skok 
na navesti zadané v rubrice "Vysledek", nebo ne. Skok se provede pouze tehdy, je-li vysledek poroy- 
nani v souladu s relatnim znakem: 


EQ rovno (equal) l.op. 
NE nerovno (not equal) l.op, 
LE mensi nebo ravno (less or equal) l.op, 
uT mensi nez (less than) leop. < 
GE vatSi nebo rovno (greater or equal) - t.op. 
cT vétsi nez (greater than) - l.op. > 


Jinak se provede nasledujici prikaz v pofadi. 


6.7.4 1, operand (sloupce 18 ad pce 33_az 42) 


V rubrikach "1, operand" a "2. operand" mahou byt u poroynavacich prikazi zapsany tyto Udaje: 


~ znakova nebo Ciselna konstanta, 
- jméno znakového nebo Eiselného pole, 
> oznaceni prvku znakového nebo Ciselného vektoru. 


Operandy musi byt bud oba znakové nebo oba ciseing. 

Tvar znakavé a Ciselné konstanty je popsan v odst. 352.5. 

Prvek vektoru se oznacuje dvojici didajd oddélenych carkou bez mezer. Prvni idaj je jmeno, vekto- 
ru, druhy je index €ili poradové cislo arvku vektoru. Index mize byt bud konstantni nebo proménny. 
Konstantni index se zapisuje jako celé Cislo (bez Znaménka}, .proménny index jako jméno pole. Toto 
pole musi byt definovano v programu jake Ciselné bez desetionych mist. Jména a Cisla musi byt volena 
tak, aby se oznateni prvku vektoru velo do 10 pozic rubriky. 

Zapisy do rubrik musi byt zarovnany vlevo (i ¢iselna konstanta). F 

Pi porovnavani Eiselnych dat se bere ohled na polohu desetinné tecky (carky) a na znaménko. 
Jsou-li Ciselné operandy réznych délek, dopIni se pro porovnani potrebny potet nul vievo ¢i vpravoe 
Jsou-li_ znakavé operandy riznych délek, dopIni se kratsi z nich pro porovnani potiebnym poctes 
mezer. Operandy vSak zistanou po skonéené operaci v pivodnim tvaru. 


6.7.2 Wy Sloupce 43 az 


Do rubriky "Jméno" (sloupce 43 az 48) musime zapsat navésti, na které ma byt praveden skok po- 
dle prikazu CAB nebo CABxx. Totes ndvésti (jméno) musi byt uvedeno v 1, Operandu jediného prikaz 
TAG nebo ENDSR v ramci stejného podprogramu (BEGSR - ENDSR). 

Ostatni rubriky - "Délka" a “Desetinnd mista" - zistavaji prazdna. 


Tato rubrika slouzi k zachyceni vysledku porovnani prostfednictvin indikdtord. Déli se na tii 
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rubrity: WBtSi" (sloupce 54 az 55), "Nen3i" (sloupce 56 az 57) a "Rovno! (sloupce 58 a 59), Do 
idé z techto rubrik 1ze zapsat indikator 01 az 99, 
kat Indikator zapsany v rubrice "V@tSi" se zapne, je-Ji 1. operand vétSi nez 2. operand. 

Indikator zapsany v rubrice "MenSi" se zapne, je-li 1. operand mensi nez 2, operand. 

Indikator zapsany v rubrice "Rovno" se zapne, je-li 1. operand roven 2. operantu, 

Stejrf indikator mize byt zaosdn nejvySe ve dvou rubrikach. 

Po poroynani operandi se vSechny vysledkovée indikatory neyprve vypnou a pak se zapne ten, ktery 
odpovida vysledku porovnani « a , 

Wsledkové indikatory se Pouzivaji k vyjadreni podminek, za nichz se maji provést jiné zvolené 
prikazy, u nichz 1ze zadat podminku. 


4,0 Presunové prikazy 

Prikazy této kategorie presouva) i 2, operand do proménné udané v rubrice "Vysledek". 2. operand 
se presunovou operaci nezméni, vysledkava proménna je prepsana cela nebo z éasti, Pocet presouvanych 
maki je urcen kratSim ddajem (2. operand nebo vysledkava proménna). Operacni Znaky presunavych pri- 
taal jsou tyto: 


ME - presun dat z pravé casti 2, Operandu do pravé casti vysledkové proménné (move - pre- 
sunout) , 

HOVEL - presun dat z levé Césti 2. Operandu do levé Casti vysledkové proménné (move left - 
presunout vlevo), 

HEA ~ presun vektoru nebo jeho césti (move array — presunout vektor). 


6.8.1 OVE a MOVEL 
- earn a pen een annem, wenenn penne neenann. 
Podainky. | 1, operand | Operace | 2, operand { Vysledek Vysledkove 
4 | indikatory | 
Nepovi nn MOVE Povinny Pavinny As 
mmm ee eneesesee es hen cerca teenie 
femme | MOVEL Povinny Povinny 


evewennnn. Se 


ey oe ‘pFesunout ) a MOVEL (oFesunout _vlevo) pfesunuji data 2. operandu do promenné 

pass rice Wsledek » Li8i se jen ve zpracovani dat nestejnych délek. 2. operand i vysledkova 

‘ema wohou byt znakové i Ciselné v libovolné kombinaci. 

a Jeli 2, Operand stejného typu a stejné délk 

athe mene dat acely 2, o i 

rad slater ronda a ‘a. aperand znakovy nebo Ciselny), dochazi pri presunu k o- 
at sa pes tinych znaku 2. operandu na hodnotu X'F' (hexadecimdlni ¢islice F). Cis- 

adele u zistane zachovana, Posledni znak 2, Operandu se povazuje za jednotky celého ¢cisla 
N8 se 2vla5{. Jeho Zonova (znaménkova) cast se prekéduje podle tohoto pravidla: 


Mili zinavé Eést hodnotu x! 


; D’ (zaporné znanénka), nezmani se; a-] hodnotu, nahradi se 
tou Xf (kladné znapénko), KO)» men S@; ma-li jinou hodnotu, nahra 


ne Znaménkem vysledkové proménné s jedinou vyjimkous Prikaz MOVEL 
kava proménna zachova pdvodni znaménko vysledkové proménné. Posled- 
k bude mit zénovou East X'F'. 
jednotlivych znakd na pravém okraji 2. operandu a vysledkave pro- 
Prikaz MOVEL zahajuje presun jednotlivych znakd na levém okraji 
@ pokracuje smérem vpravo. Pfesun v obou pripadech konéi vycerpa- 
Overand nebo vysledkova proménna). 


inne are 
5 8 pokratuje 


© perandy 
nia hratéiho 
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V rubrice "2. operand" mohou byt w prixazi MOVE a MOVEL zapsany tyto Udaje: 


~ Znakava nebo Ciselna konstanta, 
~ jméno znakového nebo Ciseiného pole, 
> oznaceni pryku znakoveho nebo ciselneho vektoru, 


Tvar znakove a Ciselneé konstanty je popsan v odst. 3. 

Prvek vextoru se oznacuje dvojici ddajé oddélenycn Carkou bez mezer. Prvni Uda} je jmeno vei- 
toru, druhy je index €i1i poradové Cisio prvku vektoru. Inaex mize oyt oud Kanstantni nebo promen- 
ny. Konstantni index se Zamisuje jako cele Cisio (bez znaméenka), Promenny index jako Jmeno pole, To- 
to pole musi nyt definovano v programu Jako Ciselne bez desetinnycn mist. Jména a Cisla musi byt 
volena tak, aby se oznaceni prveu vektoru veslo co 10 pozic rubriky. 

Zapis mus) zacinat ve slougci 33 (1 ciselna konstanta). 

Pri ofesunu Cisel se nebere ohied na desetinna mista; Ma cisio se pohlizi tak, jako by v ne 
Zadna desetinna mista nebyia. 


(sloupce 43 az 52) 


Prikazy MOVE a MOVEL vyzadu}? zap)s do rubrixy 
“Delka" a "Desetinna mista", V *corice "Jmeno’ 
selna promenna: 


Vysledex", ktera se dél) na rubriky "Jimeno", 
(sloupce 43 az 48) musi oyt uvedena znakova nebo ¢i- 


~ jmeno pole definovaného ‘inde y programu, 
~ jméno nového pole, 
~ Oznaceni orvku vektoru. 


Oznateni prvku vektoru J@ Donsano v odst. 6.6.2, 

Rubriky "Delka" (sloupce 49 az 51) a "Desetinna mista” (sloupec 52) musime vypinit jen tehdy, 
jestlize jsme do rubriky "Jméno" zapsali jmeno noveho pole, které neni definavano jinde. Jest lize 
vyplnime tyto rubriky i y Jinych pFipadecn, musi byt udaje-o delce a desetinnych mistech  shadne 
s tem, které jsou zapsany v Jiné definici téhoz pole, popr. v definici tabulxy (t}. vektoru), U 
znakovych proménnych rubriku "Desetinna mista” nevyploujeme, 

Délka Ciselné proménné nesm) gresahovat 15 cislic. Pocet jejich desetinnych mist musi byt 
0 az % nesmi v3ax ofekrocit délku (celkovy gocet €isiic), Délka znakove Proménne mize byt 1 az 
256 znaki. Délkovy udaj musi byt v ruprice Zarovnan vpravo, 
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a ee i ime 


| ! I | 


| Forme | Podminky | | 


fe {Ope- 
| operand frace 


! 

| Big 

| hg : j__|_IWystedxy|_ 
j67/89 

IB (jj yD 


Wsvétlivky k obr. 6.5: 


-Wsledky plati za predpokladu, Ze hodnoty poli 8, C jsou tyto: 
B= 'ABCD" {znakovy Udaj), 
C= 12% (Ciseiny ddaj). 


operand | Vysledek T vstedkove | 
indikatory | 
womatannnnnmnematemaeenemnmnm| 
| Povinny | 


eae eee rn thet weaned 


Frasity [1 operané | Operace 


MOVEA 


SS nt 


Nepavinny | Pavinny 
i | y 


Prikaz MOVEA presunuje data z 2. operandu do Promenné udané v rubrice "Vys)edek", Na rozdil od 
pfikart MOVE a MOVEL musi alespoh jeden z idajé predstavovat vektor nebo jeho prvek. Oba udaye musi 
byt znakove 3 nesn’ji odkazovat na tentyzZ vektor. 

Prikaz MOVEA presouva nékolik Sousedicicn prvki vektoru do pole, nebo obsan pole (popr. kons- 
lantu) do nékolika sousedicich prvki vektoru, anebo nékolik sousedicich prv«d vektoru do nekolika 
Suusedicich prvkd vektoru, 

Presun zacina vzdy prvnim znakem zleva (2. aperandu i vysledkové proménné) a pokracuje smérem 
Yoravo. Konéi tehdy, je-li vyCerpan kratSi z obou Gdajd (2, operand nebo vysledkova proménna). Maze 
# tedy stat, Ze presun skonéi uprostred pole (konstanty) nebo prvku vektoru. Je-1i 2. operand 
dels mez vysledkova proménna, Nepresunou se jeho nadbytecné znaky; Je-li kratSi nez vysledkova 
Provenna, zdstane zbytek vysledkové pronénné nezménén. 


S621 2 operand (stou 


Vrubrice "2, operand® @ohou byt u prikazu MOVEA zapsany tyto Udaje: 


7 Thakové konstanta, 
~ J8800 2nakového pole, 
3 jing znakového vektoru, 
nacent pryvky Znakoveho vektoru, 


Var anatove konstanty je popsan v odst. 3.2.5, 
caceMi orvku vektoru je popsana v odst. 6.4.1. 


1S Musi Zacinat ye Sloupci 33, 
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6.8.2.2 Wsledek (sloupce 43 az 52) 


Prikaz MOVEA vyzaduje zapis do rubriky "Vysledek", ktera se déli na rubriky “Jnéno” a “Délka", 
(Rubrika "Desetinna mista" musi zistat prazdna.) V rubrice "Jméno" (sloupce 43 az 48) musi byt uve- 
dena znakova promenna: 


~ jméno pole definovaného jinde v programu, 
~ jméno nového pole, 

~ jméno vektoru, 

~ oznaéeni prvku vektoru. 


Oznaéeni prvku vektoru je papsano v odst. 6.6.2. 

Zapis musi zacinat ve sloupci 43. t : . 

Rubriku "Délka" (sloupce 49 az 51) musime vyplnit jen tehdy, jestlize jsme do rubriky “Jneno” 
zapsali jména nového pole, které neni definovano jinde. Jestlize tuto rubriku vyplnime iv jinych 
pripadech, musi byt udaj o délce shodny s tim, ktery je zapsan v jiné definici téhoz pole, popr. 
v definici tabulky (tj. vektoru). Délka nesmi prekrocit 256 znakd; ddaj musi byt v rubrice zaroy- 
nan vpravo. 


[romrcnmconemmyennnmay=pannnnaen ann zacene inne paaeaenomennncatcnenrnreneennann 
| Indikator | {| i | - | | DalSi funkce 
(CHECK,ERROR)| © Typ | { | Uziti | 
i reatatateneiee ta | jmena 4 ewnmemenneny |Pozice r 
Poznamka] | Jwénc | | Desetinna | | [| ADD  DSPATR LOGK SEQ —suBST | 
i mista | | | ARRATR EDTCDE PMT © SETOF TADD | 
| 


Fores souboru/j mmeqmy | femmpmm={ AUXDUP ERROR RANGE SETON TSUB 
{) rape |zaznamu/! [Typ dat} | }1} | | AUXST EXSR RANGET SHIFT XCHK 
pole/ ff INSERT RESET SUB konstanta 
tabuliy | a 
CHECK(AD AS BC BV BY DD DR FE Gxx +4 
LC ME MF Mix RB RL RZ) 


6 
4 
A 
4 


wa yanenenenennyennnanancnyne: meena qn pomennnwngaen ene 
{ Wysledek | | | 
frewneneneened | Vysled. | 
| Des.mista | | indik. 
ann H eogeepeny Poznamky 
| Peli fr Jot 
|Jméno Jka gral 
| TEP dcde | 

SSunta Eat 

45| 


| Podminky 


Vysvétlivky k obr. 6.9: 


~ Stav pred operaci MOVEA: VEK: ABCDEFGHIJ POLE: 1234567890 
stay po operaci MOVEA: VEKs = POLE: EFGHIJ7890 
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4,9 ilove prtkazy 
Prikazy této skupiny dovoluji Zapinat, vypinat a testovat jednotlivé oity ve slabice nebo 
coabinace. Bity se zadavaji maskou, coz ie seznam Cislic (0 ak 7), které udavaji bitove 


ki zoe 
jejich eva). Pat?i sem tyto operacni znaky: 


potice (2! 


BITN ~ zapnuti bitd (bits on), 
Biter © - vypnuti bitd (bits off), 
Tes © testovani bitd (test bits). 


re Tee oenane: at 
pal 1. operand | Operace Ysiedkove | 
| ndikatory 
aaa fan af enn 
Povinny Povinny | | 


é Povinny Povinny 
H 
INepovinng TESTB Povinny Povinny I Fovinne | 


Prikaz BITON (BITOF) zapina (vypind) ve slabice zadané v rubrice "Vyslede<" bity uréené maskou 
¥ 2, operandu, 

Prikaz TESTB (test bits - testovat bity) testuje ve slabice zadané v rubrice "Vysledek" bity 
uréené maskou v2. operand a vysledek testu oromitne do vysiedkovych indikatord. 

faska ole byt zadéna oud jaxo znakova konstanta, tj. }axo sekvence Cislic uzavrena v apostro- 
Techy ide Wazda Cislice znamena poradové Cisio ditu Eitané od 0 ao 7 (napr. ‘O57! znamena bity 
4, 5 7), nebo jako ednoznakova proménna, v niz jsou Zadané bity nastaveny na nodnotu 1 (zapnuty) 
azhyvajici bity na hodnotu 0 (vypnuty), napr. pole MASKA s osmi dity: 10000101, tj. bity 0, 5, 7. 


bh 2, operand (sloupce 33 az 42) 


Vrubrice "2, operand” musi byt zadana bitova maska v jedné z téchto forem: 


~ matova konstanta, 
M10 2nakoveho pole, 
~eanaCent Srviu. znakového vektoru. 


aa Konstanta musi mit tvar sekvence Cislic uzaviené v apostrofech. Cislice jsou z rozsahu 
eal: relativni polonu Zacanycn bith ve slabice zleva. 
ida nh pole j Prvek znakovéno vextoru musi mit délku 1 a musi obsahovat binarni jednicky na 
a Ovych pozicicn; na ostatnich ditovych pozicicn jsou binarni nuly. 
zee BFVKU veKtoru je pogsdno v Odst. 6.6.1, 
Tapis aus; Za€inat ve Sloupci 33, 


Vise Islouce 43 af 52) 


2 "elk, Wn BITOF, TESTB vyZaduji zapis do rubriky "Vysledex", kterd se déli na rubrixy 
48) saci n, (Pubrika "Desetinnd mista’ musi zistat prazdna.) V rubrice "Jméno" (sloupce 
Ms! ojt znakova proménnd: 

~ Ita znakave 


~ jo nov ho pole definovanéno 


hind 
znakového aie cinde v programu, 
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saci arqunent. Tyto typy hledani Ize kombinovat: _vyhledat prvek, ktery je roven nebo nejblize 
vac pr. prvek, ktery je raven nevo nejblize nizsi. Nejsou-li prvky vektoru usporadany, lze vy- 
tha ieee ktery je roven vyhledavacinu argumentu. 


- oznaceni orviu znakoveho vektoru, 


Oznaceni prvku vehtoru je popsdno v odst. 6.6.2. 
Zapis musi zacinat ve sioupci 43. - = tf | 
Rubriku “Delxa" (sloupce 49 az 51) musiwe vypinit jen tehdy, jestiize jsm@ do rubriky “Jneng" eT io =e ae ay 
zapsali jmeéno noveno cole, <teré neni definovano jinde. Délkovy ddaj musi ayt 1. Jestiize tuto rub- Poisinky | 1. operand | Operace | 2. operand | Vysiedel Wsledkové | 
rity vyplnime iv jinych ech, musi byt délkovy uca; tase 1. Mm t wzdy Zarovnan vpravo, | indikatory | 


a, inn’ P y Povinné 
ef ef ovis 


Ei Tibioeer and sloupce 18) az 27) 


Vysledek testu size oyt zachycen az tfesi indixatory zyo- 


zapne, jestlize vSechny testované bity jsou vypnuty. Jinak 
: P . Do rubriky “1. operand" musime zapsat vyhledavaci argument v jednom z téchto tvards 
Indi<ator zapsany v rubrice 56-57 se Zapne, jestlize nekteré testovane bity Js0u Zapnuty a nék- 
tere vypnuty. Jinak se vypne. e y «= lonstanta, 
Indikator zapsany v rubrice 58-59 se zapne, jestlize vsechny testovane Olty jsou zapnuty. = jséno pole, 
Ste}ny indikator nesmi byt zapsan ve vsech trech rubrikach zaroven. « taméent prvku vektoru. 


quent musi souhlasit s vyhledévanymi prvky co do typu (znakového, Ciselného) i co do délky. 


frecenenamennd { Vysled. | Tipis (i Ciselna konstanta) musi zacinat ve sloupci 18, 


Des.mista | j indik. 
iB Ope- 2s 7 Poznamky 
| Operand {race | operand | 


Seen iia) inane termite in eeteeieeten meee coer Twar konstanty je popsén v odst. 3.2.5 a oznaceni prvku vektoru v odst. 6.6.1. Vyhledavaci ar- 
iS § Ts i Wjsieder |] | = ai 
i IS a 
| 
| 
| 


$10.2 2. operand (sloupce 33 az 42) 
8 


eR ae See Do rubriky "2. operand” musise zapsat jméno vektoru, v néwz se ma hledat. Toto jméno 1ze dopl- 
1234367890 1234567890 nit Gérkou a indexem na oznaceni prvku vektoru (viz odst. 6.6.2). 

Jeli zapsino jen jméno vektoru bez indexu, vektor je prohledavan cely (od zacatku) a vysled- 
fea oerace jsou jen nastavené vysledkavé indikatory. 

Jeli zapséno jméno vektoru s konstantnim indexes, je vektor prohledavan az od prvku timto in- 
eres uréeného. Wsledkem operace jsou jen nastavené vysledkové indikatory. 

Jeli Zapséno jéno vektoru s Proménnym indexem, je vektor prohledavan od prvku, jehoz index 
18 prosénnée indexu v okamziku zahajeni operace. Po skanceni operace se do proménného indexu ulozi 


rom tislo nalezeného Prvku. Nenajde-li se hledany prvek, dosadi se do proménného indexu cislo 


Dioioiaioie 


eee 


Vysvétlivky k obr. 8.10: Tapis wisi zazinat ve sloupci 33. 


JTON zapne v promanné MASKA bity 0, 5, 7. Za Predpokladu, Ze proménna MASKA byla pred- 
tim prazdna, t}. obsahovala samé binarni nuly, jsou to jediné zapnuté bity v teto promenne. 
~ Prikaz TESTB testuje bity v promenné KODCH podle Masky obsazene v promenne MASKA. Jsou-li v masce 4.10.3 Wy ed 7 
Zapnuty jen bity 0) 5, 7, testuji se jen oicy 0, 5, 7 proménné KODCH, Indikator i6 se zapne, jsou- oe infikstory (sloupce 54 az 59) 
~li vSechny t7i bity nulové. Indikator 17 se Zapne, je-i1 alespoh jeden z téchto bitd zapnut ‘ are (ae Zugne eee 
a alespoi jeden wyonut. Inaikétor 16 se zapne, ana vSechny testavané bity zapnuty. a wana amt slouzi dvéma Uéeldm: zadava}i zpisob vyhledavani a zachycuji vysledek 
-Ta oFedpokladu, Ze proménna KoDcH Obsahuje 5ity 11110000, a Ze proménna MASKA adsahovala na zatat- Indikétor i mene! elt Ae ron epee zey Sah 
ku samé binarni nuly, je vysiedkem abou Prikxazu zapnuty indikator 17 (smiSené hodnoty bitd). wel, Tanne se pate a ged zadava hledani prvku nejblize vy3éiho me ve rs 
stu, u vy prvek nalezen, jinak se vypne. Prvky vektoru misi byt setridény v: 
x Indikator Zapsany v rubrice 56-5? zadava hledéni prvku nejblize nizSiho nez vyhledavaci argu- 
6.10 Hledani ve vektoru (tabulce) stp pne se, je-1i takovy prvek malezen, jinak se vypne. Prvky vektoru musi byt setridény vze- 
Do této <ategorie patfi jen piikaz LOKUP (ook up - vyhledat). Tento prikaz vyhledava ve vek~ 8, fel Zapsany V rubrice 58-59 zadavé hledani Prvku rovneho vyhledavacimu argumentu. Zapne 
Peet tabuleel urcity peeatovany arvek (polozku). Nalezne-1i jej, Zapne zadany vysledkovy indikator. taititory peti Jinak se vypne. Prvky vektoru nemusi byt setFideny, Hih 
* vyhtedayvani pouziva vyhledévaci argument Zadany v rubrice "i. operand". , ‘Onbinovat ve dvojici: v rubrikéch 54-55 a 58-59 zadame hledéni vyssiho nebo 
, Ve ree Ize hledat nékolika zpisooy, «tere }S0u podminény usporadanim prvki vektoru. Jsou-li (heh lange Onikach 56-57 a 58-59 zadame hledéni nizéino neoo rovného prvku. V téchto pripa- 
prvky vektoru usporddany vzestupné padle znakové tridici sekyence, ize vyhledat prvek, ktery Je fo & inditator i stejné Cislo indikatoru. Najde-li se prvek rovny vyhleddvacimu AngUMENiUy, zaphe 
ven vyhledavacimu argumentu, ejd]ize vyS$i nez vynleaavaci argument nebo nejblize nizsi nez vynle- ile hheds faleiblise 58-59 @ operace skonci. Jestiize se takovy prvek Menajde, pokracuje operace 
128 vyS8iha, popr. nizéiho prvku. 


6-20 DE/RPG - Papis jazyka 


Formular C - vypocty 6-21 


vstupu _a_vystupu 


Prikazy teto skupiny umozhuyi aienaset data wezi programenm a pridavnymi zarizenimi. Maji tyto 


Operacni znaky: 


READ €teni dalSiho zaznamu vpied (read - cist), 

READP © Cteni predcnozino zaznamu (read previous ~ Cist predchozi), 
CHAIN €teni urceneho zaznamu primo (chain - retezit), 

WRITE  zapis noveho zaznamu (write - zapsat), 

UPDAT prepis precteného zaznamu na miste (update - aktualizovat), 


DELET zruSeni zaznamu (delete - zrusit), 7 
SETLL nastaveni pozice y souboru pro sekvencni Cteni (set lower limit - nastavit dolni mez), 


EXFMT provedeni obrazovxoveno formatu (execute format - provest format), 


OPEN otevreni souboru (open - otevrit), 
CLOSE  uzavreni souboru (close - zavrit), 
FEOD vynuceni konce dat (force end of data - vnutit konec dat). 


Pro zpracovani soubori pouzivajicich adresn) index (viz kap. 12) 1ze pouzit jen prikazy OPEN, 
READ, UPDAT a CLOSE. Prikaz FEOD mize byt pouzit jen na homumikacnich souboregh (DEVICE (COMM) y pri- 
kazu pro popis souboru). 

Nez se vyda prvni ofikaz pro komunikacni soubor, méla by se zobrazit zprava, ktera vyzyva ope- 
ratora, aby navazal spojeni. - 5 sep 

Poznamka: Vysledkovy indikator ve sloupcich 56-5? se pouziva ve spajeni s klicovym slovem 
STATUS, které definuje proménnou, do wz se uxiadaji nextere chybove kddy (viz odst. 4.1.5). 


frosnesonnnyanncnnnnnnnnyannanenenpannannnnsnayannn nen 
| Podminky | !, operand | Coerace | 2. operand | Vysiedek | Vysledkove | 
| | | andaxatory | 


wane mem en mney 


1 
| 


Nepovinne | READ | Fovinny 


Povinne | 


ee neneeenn: eee eneeenned 


Prikaz READ (read - Cist) poskytuje sekvencmi (postupny) pristup k zaznamdm souboru, t). cte 
dalsi zaznam souboru, Souvor wize byt disketavy nebo Komunixacni. "Daigi zaznam" znamena u neinde- 
xavanych disketovych soubord zaznam s vy5sim poradovym cisiem, U soubor s Klicovym indexem je to 
zaznam odgovidajici nésteré daisi polozce indexu (podie 2, aperandu), t). vzestupnemu poradi podie 
klice, Podobné u souboru zpracovavaného, adresnim indexem se precte zaznam odpovidajici nektere dal- 
5i polozce indexu (podje 2. operandu), t}. nasleaujici zaznam ve smyslu tridiciho kriteria zadane- 
ho thidicimu programu. 


S.1l.1.1 2. operand (sloupce 33 


V rubrice "2, operand" musi byt zapsano 
yy Ps 


~ jmeno souboru papsaného na formuiari A nebo 
~ jmeno zaznamu popsaného v ramci tohoto souboru. 


Je-li zadano jméno souboru, ete prikaz READ nejblizsi dalSi zaznam ze souboru bez ohledu na 
jeho typ. Typ precteného zaznamu mize byt zjiStén pomaci kli€ovych slov RECID, SETOF, SETON zada~ 
nych v prikazech pro popis zaznamu na formulari A, Tato klicova slova umozhuyi zapnout pro kazdy typ 
zaznamu jiny indikator. 

Je-1i zadano jméno zaznamu, prahlédne prikaz READ nejolizéi dal$i zaznam souboru a zyisti, zda 


se jeho typ shoduje s typem predepsanym klicovym slovem RECID v odpovidajicim prikazu pro popis zaz- 
namu. Jestlize se neshoduje, prohlédne se dal3i zaznam a Postup se opakuje. Operace skonci, jestlize 
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se precte zaznam predepsaného typu nebo yestlize je zjistén konec dat, Neni-liv prikazu pro pons 


zaznanu klitove slovo RECID zadano, Je postup stejny. jako v pripadé se Splat Nes 
tj. prette se nejbliz5i dal5i zaznam. 
Tapis musi zacinat ve sloupci 33, 


“+ operandu, 


Wsledkavé indikatory dovoluji zjistit konec dat (konec souboru) a chybu zaFizeni, 
zapisy jsou Cisla indikétord 01 az 99, 

Indikator zapsany v rubrice 56-57 (nepovinny) s@ zapne, jestlize na vstupnim zarizeni doglo 
k chybé. Neni-li indikaétor zadan a dojde k chybé, zobrazi se systemova zprava. 

Indikator zapsany v rubrice 58-59 (povinny) se zapne, je-la 
boru. 

Rubrika 54-55 musi zdstat prazdna, 


Povolene 


Zjisten konec dat ystupniho sou- 


6.11.2 READP 


eoeraraeyeanenanacaeepennennman 


Vysleakave | 
indikatory | 


SEL] 


+ Operand | Vysledek 


nsoeoeoenescninen AAD Pays, ieamlt Povinne | 


Prikaz READP (read previous - ist predchozi) umoziuje Cist zaznamy disketoveho souboru pozpat- 
kuy tis Cte predchozi Zaznam souboru. "Predchozi zaznam" znamend u Meindexovanych souboré zaznam 
§ mzsim poradovym Cislem. U soubord s klicovym indexem je to zaznam Odpovidajici nekter@ pFedcnozi 
polozce indexu (podle zapisu v 2, Operandu), tj. sestupnému poiadi podle Kiice, ‘ 


Vrubrice "2, operand" musi byt zapsano 


5 jnéno disketavého souboru popsaného na formulaii A nebo 
~ Jnena 2aznanu popsaného v rémci tohoto souboru. 


Jeli zadéno jméno souboru, 


Cte prikaz READP nejplizsi redchozi zaznam ze souboru bi 
ma jeho typ. Typ precteného zazn, A k 1D, SETOF, SETON as. 


amu mize oyt zjisten pomaci klicavych slov RECID, SETOF, SETON za- 
amu na formuldri A, Tato klicova slova umozhuji zapnout pro kazdy 


Ki sels aoe jmeno zaznamu, Prohledne prikaz READP nejblizSi predchozi zaznam souboru a zjis- 

' Jeho typ shoduje s typem Predepsanym xlicovym slovem RECID v odpovidajicim prikazu pro 

jestlide ge Resa se neshoduje, prohléane dalsi zaznam a postup Se opakuje. Operace skonci, 

tj, byl-li ahistén ee predepsaného typu nebo jestlize byl JizZ prohlednut prvni zéznam souboru, 

zatin, je ie: ae as Zpetnem sméru. Neni-li v prikazu Pro popis zéznamu klicove slovo 

i183 predchonk soe Jny jako v pripade se jmenem souboru v 2. operandu, tj. precte se nej- 
DIS Musi zacinat ve Sloupci 33, 


611,2,2 Wsledkové indik, 


loupce 54 az 59) 


Wsledkové indika fe 
ve indikatory dovoluji zjistit "konec dat" ve zpetném sméru (tj. viastné za¢dtek sou- 
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boru) a chybu zarizeni. Povolene zapisy }sou Cisla indikatord 01 az 99. eee 
Indikator zapsany v rubrice 56-57 (nepovinny) se zapne, jestlize na disketé doslo k chyba, Ne 
ni-li indikator zadan a dojde k chybé, zodrazi se systemova zprava. te ; : 
¥ Indixdtor zapsany v rubrice 58-59 (povinny) se zapne, pokouSi-li se prikaz READP Cist predchozj 
zaznam po zpracovani arvniho zaznamu souboru (pred zacatkem dat). 
Rubrika 54-55 musi zistat prazdna. 


6.1.3 CHAIN 
Prikaz CHAIN (chain - fetézit) umozhuje primy pristup k zaznamim disketového souboru, 


a a a 


[rowecenemeyennennennenaya - 

| Podminky | 1. operand | oerace | 2. operand | Vysledek | Vysledkove | 
indixatory | 

[peaeenmean fence nan enfemnnnnenn fewnnennennnn fereencerone femmnnnnnne= 


Nepovinnée | Povinny CHAIN Povinny | Povinne 


6.11.3.1 1. operand (sioupce 18 az 


Do rubriky "1. operand" zapiSeme vynledavaci argument, ktery identifikuje hledany zaznam. Wy- 
hledavacim argumentem mize byt bud poFadové Cislo zéznamu nebo kli¢ zaznamu, pode typu organizace 
souboru. Jestlize soubor oosahuje zaznamy bez klicoveho pole, musi byt hledany zaznam ident ifikovan 
poradovym Cislem. Jestlize soubor obsahuje zaznamy s klicovym polem (K v rubrice “Typ jmena" na 
formulari A), musi oyt hledany zaznam identifikovan klicem. 

Poradove Cislo mizeme zapsat jako 


- iselnou ‘astantu bez cesetinnych mist (s nepovinnym znamenkem + pred prvni Cislici) nebo 
- jméno Ciselnéno pole oez desetinnych mist nebo 
= oznaceni orvku Ciselného vektoru bez desetinnych mist. 


Klié mizeme zapsat jako 
- konstantu nebo 
- jméno pole nebo 
> oznateni prvku vektoru. 
Tadany klié (vyhledavaci argument) musi mit stejny typ, délku a pocet desetinnych mist jako 
kli€ové pole zdznamu. 


Tvar konstanty je popsan v odst. 3.2.5 a oznaceni prvku vektoru v odst. 6.4.1, 
apis musi zacinat ve sloupci 18. 


4.11.3.2 2. oper: 
V rubrice "2, operand" musi byt zapsano 


= jméno disketového souboru popsaného ve formulari A nebo 
= jméno zaznamu popsaného v ramci tohoto souboru. 


Je-li zadéno jméno souboru, vyhledé prikaz CHAIN ziznam podle vyhledévaciho argumentu a pre 
Cte je} bez ohledu na typ. Typ precteného zaznamu mize byt zjistén pomoci xlicovych slov Rec 
SETOF, SETON zadanych v prikazech pro popis zaznamu na formuld?i A. Tato klicova slova umnziuy 
Zapnout pro kaidy typ zaznamu jiny indikator. Nenalezne-li se nledany zaznam, zapne se vysledkovy 
indikator zansany ve sloupcich 54-55 (zaznam nenalezen). 
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Jeli zadéno ymeno zaznamu, vyhleda pFikaz CHAIN Zaznam podle vyhiedavaciho argumentu a zkouma 
jeho tyo. Jestlize se shodu je s typem predepsanym klicovym slovem RECID v Ogpovidajicim prikazu pro 
popis zaznamu, zéznam se precte podle odpovidajicino formatu. Jestlize se nesnoduje, Zapne se vys- 
ledkovy indikator zapsany ve sloupcich 54-55 (zaznam nenalezen). Tento indikator se Zapne rovnez 
tehdy, nenalezne-li se zaznam zadany vyhlecavacim argumentem. 

Zapic musi zacinat ve sloupci 33. 


Wsledkavé indikatory dovoluji zjistit, zda se hledany zdznam nalez) ¢i nenalez] a zda doslo ¢i 
nedoslo k chybé zarizeni. Povolené zapisy jsou Cisla indixatord 01 a3 99. 

Indikator zapsany v rubrice 54-55 (povinny) se zapne, jestlize se hledany zaznam nenalezi, 

Indikator zapsany v rubrice 56-57 (nepovinny) se zapne, jestlize na disketé dosio k chybé. Ne- 
ni-li indikator zaddn a dojde k chybé, zobrazi se systémova zprava. 

Rubrika 58-59 musi zistat prazdna. 


6.11.4 WRITE 


[ora nennnnnenen nanan nny mnnnnnnnennnyennnnnennne pomnanennnneny 
| Podminky | 1. operand | Operace | 2. operand | Vysledek | Wsiedkove | 
| | indikatory | 


Nepovinne Povinny Nepovinne 


Prikaz WRITE (zapsat) ofenasi novy zaznam na vystupm zarizeni. Tim mize byt obrazovka, diske- 
ta, tiskarna a komunikacni zafizeni. 

Jediné klicové slovo, které je povoleno y ruorice "Daléi funkce” u zaznamu zapisovaného prika- 
zem WRITE, je EDTCDE. 

Zaznamy Zapisované na obrazovku nemohou pozadovat vstup z klavesnice a mohou obsahovat jen vy- 
stupni pole. 

ms Unisténi fového zaznamu v disketovém souboru zavisi na tom, zda zaznamy obsahuji Ci neobsahuji 
klicove pole Kv fubrice "Typ jména") a na pouzit{ klicoveho slova JNDEX v popisu souboru. 

Jestlize Zaznamy neobsahuji klicové pole, zapise se zaznam za konec dosavadnich dat jakozto po- 
sledni Zeznam soubdoru. Jestlize zaznamy obsanuji klicove pole, ale neni zadano klicové slovo INDEX, 
vlozi se Navy Zaznam do soudoru na misto, kam pati i podle nodnoty klicoveha pole. Vytésnéné  zaznamy 
82 posunou smerem ke konci souboru. Je-1i zadano «ii¢ové slovo INDEX se jménem klicového  indexového 
souboru, Zapise se novy zaznam za konec dosavadnich dat jakoZto posiedni zéznam souboru a do inde- 
xoveho Souboru se vlozi nava indexova polozka na misto, xam patti podle nodnoty klicového pole za- 
Pisovaneho zaznamu. 

Je-li pFikaz WRITE jedinym prikazem pouzitym pro disketovy soubor, pak se pri otevreni obsah 
souboru vymaze a delka zaznamu se upravi podle definice souboru, 

Prikaz WRITE Pro komunikatni soubor pfenasi zaznam v délce zadané v prikazu pro popis souboru 
nebo pro popis zaznamu. 


S141 2 


V rubrice "2, operand” musi byt zapsano jméno zaznamu z prikazu pro popis zaznamu na formulari 


4. Tento pFikaz musi ay casti Si Sees aa o A z 
1 ayt z 
ii yt soucasti popisu souboru, na néjz ma byt zaznam zapsan. Zapis musi zacinat 
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Vysledkové indikatory dovoluji zjistit, zda se zapisovany zaznam ve5el Ci nevesel do disketo- 
vého souboru a zda doSlo ¢i nedo$lo k chybé zarizeni. Povolene zapisy jsou Cisla indikatord 01 a3 


9. ‘ . 2 5 
Indikator zapsany v rubrice 58-59 (nepovinny) se zapne, jestlize se zaznam neveSel do disketo- 


vého souboru (plny soubor). ; ‘ ; : a 
Indikator zapsany v rubrice 56-5? (nepovinny) se zapne, jestlize na vystupnim Zarizeni doslo 
k chybé. Neni-li indikator zadan a dojde k chybé, zobrazi se systémova zprava. 
Rubrika 54-55 musi zdstat prazdna. 


6.11.5 UPDAT 


eee ee ee ee aaa cana 


Podminky | 1. operand | Operace operand | Vysledek Wysledkove 
| indikatory 


Nepovinne UPDAT Povinny Nepovinne 


Prikaz UPDAT (update - aktualizovat) prepisuje disketovy zaznam na tomtez misté, odkud byl 
precten ofikazem READ, READP nebo CHAIN. Data z precteneno zaznamu mohou byt v programu zmenéna 
a pak zapsana spolu s ostatnimi daty zaznamu zpet na disketu. Tim je pivodni zaznam na disketé pre- 
psan (aktualizovan). V souboru s kiicem nesmi byt prepsano klicove pole. 


4.11.5.1 2, operand (sloupce 33 az 42) 


V rubrice "2. operand" musi byt zapsano jméno zaznamu z prikazu pro popis zaznamu na formulari 
A. Tento prikaz musi byt sou€asti popisu souboru, na némz ma byt zaznam prepsan. Zapis musi zatinat 
ve sloupci 33. 


$.11.5.2 Wsledkové indikatory (sloupce 54 az 59) 


Vysledkovyin indikdtorem zansanjm v rubrice 56-5? (nepovinnym) ize zjistit, zda do$lo k chybe 
diskety. Neni-li indikator zadan a dojde k chybé, zobrazi se systémova zprdva. Povolené zapisy jsou 
Cisla indikatord 01 az 99. 

Ostatni rubriky (54-55 a 58-59) musi zistat prazdné. 


6.1146 DELET 
Aeacnnnnqannaawnnnnntaanannnanyananananncntannnenanennpanannmenen 
| Podminky | 1. operand | Operace | 2. operand | Vysledek | Vysledkove 


indikatory 


es an een eS Ba 


[iepovinnd | Nepovinny | DELET Povinny | Nepovinne 


Sine Raat aces bic ees RES Mec | 


= Prikaz DELET (delete - zruSit) ruSi zaznam v disketovem souboru. Tento zaznam nemize byt pak 
jiz precten. V souborech bez klicového pole je mozné zrusit pouze naposled precteny zaznam. V sou 
borech s klicovym polem mize byt ruSeny zaznan zadan kiicem. 
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bt.be1 1, operand 


Tipis do rubriky "1. operand" plati jen Pro soubory s klicovym polem (K v rubrice "Typ jmeéna"’ 
gtikazu pro popis pole na formulari A). Predstavuje vyhlecavaci argument, tj. obsah klicového pole 
ruseného zaznamu. Prazdny zépis znamena, ze se ma zrusit posledné precteny zaznam. 

Povolené zapisy jsou tyto: 


- konstanta, 
~ jnéno pole, 
- oznateni prvku vektoru. 


Tvar konstanty je popsan v odst. 6.6.1. 
Tapis musi zacinat ve sloupci 18 a musi mit stejny typ, déliu a pocet desetinnych mist jako 
Kigové pole y zaznamu. 


4,116.2 2. operand (sloupce 33_az 42) 


Vrubrice "2. operand " musi byt zapsano jméno souboru, v némz ma byt zaznam zrusen. Jméno 
souboru musi dyt definovano na formulai'i A. Zapis musi zacinat ve sloupci 33. 


Si1l.6.3 Wsledkové indikatory (sloupce S4 az 59) 


Wsledkove indikatory dovoluji zjistit, zda se rugeny zaznam nagel ci nenaSel a zda doglo ¢i 
redoslo k chybé zarizeni. Povolené zépisy jsou cisla indixétord 01 az 99. 

Indikator zapsany Vv rubrice 54-55 se zapne, jestlize se ruSeny zdznam urceny 1. aperandem ne- 
nalezl, Tento indikator je povinny, je-li zadan i. operand; jinak je jeho zapis zakazan. 

Indikator Zapsany Vv rubrice 56-57 (neoovinny) se zapne, jestlize doslo k chybé zarizeni. Neni- 
cli zadan a dojde k chybé, zobrazi se systémova zprava. 


6117 SETLL 


MTosewcnecnyenaeanennenn pana nanamaee ya namenn ane 


[osteo pocemenemnen 
| 1 operand | Operace | 2. operand | Vysiedek | Vysledkove 
| | | indikatory 


ee eemeeene, aan nnnnhannnnnnnnnnnfannenmn mane 


Nepovinné | Povinny — | SETLL | Povinny | 
a, as 


| Nepovinne j 


Prik 5 Pe 
alee ay lower limit - nastav dolni mez) dovoluje nastavit disketovy soubor na zacatek 
tov thee u Zaznamd, xteré maji byt zaracovany sekvenéna. Zacatek dsexu se zadava bud jako pora- 

x zaznanu nebo jako kli¢ zaznamu. Tenio zaznam mize a nemusi existovat. Jestlize exisiuje, 


Je pfetten prvnim pFixazem READ nasi icim za pe Si S é rect i 
FEAD dali Baia (ake “4 ae oe Za prixazem SETLL. Jestlize neexistuje, precte prikaz 


OAL 4s operand ‘sloupc 


r "4 ; 
smlici one cea musi byt zapsan vyhledavaci | argument, ktery identifikuje zaznam pred 
d potadové Eislo “real laa Zpracovavanych zaznamii (dolni mez). Vyniedavacim argumentem mize 
Sthije zaznany Sez 14 eznamu neo Klic Zaznaiiu, pocie typu orgamizace souboru. Jestiize soubor ob- 
icoveho pole, musi byt vyhiedavacim argumentem poracové Cislo zaznamu. Jestlize 


SOubor obsanuje 4 ss 
7 zazr I 2 we " ) 7 
Vacin ariises cs fate ees polem (K v rubrice "Typ jména" na formulari A), musi byt vyhieda- 
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Poradovée Cislo mizeme zapsat jako 


€iselnou konstantu bez desetinnych mist (s nepovinnym znamenkem + pred prvni Cislici) nebo 
= jméno Cise]ného pole bez desetinnych mist nebo 
> oznaceni prvku éiselného vektoru bez desetinnych mist. 


Klié mizeme zapsat jako 


- konstantu nebo 
- jména pole nebo 
~ oznaceni prvku vektoru. 


Zadany klié (vyhiedavaci argument) musi mit stejny typ, délku a pocet desetinnych mist jako klico- 


vé pole, ee 
Tvar konstanty je popsan v odst. 3.2.5 a oznaceni prvku vektoru v odst. 6.6.1. 


Zaois musi zacinat ve sloupci 18. 


4.11.7.2 2, operand (sloupce 


Tapis v rubrice "2. operand" musi byt jméno souboru popsaného ve formulari A. Zépis musi zaci- 


nat ve sloupci 33. 


6.1.7.3 Vysl 


Wysledkové indikatory umoziuji zjistit, zda zvolend dolni mez (zacétek Useku) vy souboru exis- 
tuje Ci ne, zda by) vyhledavaci argument zadan presné (nalezl se zaznam se stejnym klicem) Ci ne 
(nalez] se zaznam s vySSim kligem) a zda doSlo ci nedoSlo k chybé zaFizeni. Povolené zapisy jsou 
Cisla indikatord 01 az 99. 

Indikétor zapsany v rubrice 54-55 se zapne, jestlize zvolend dolni mez (zacatek dseku) vy sou- 
boru neexistuje, t}. jestlize je zadano prilis velké poradave Cislo zdznam nebo prilis velky klic. 

Indikator zapsany v rubrice 58-59 se zapne, jestlize se nalezl zaznam presné adpovidajici vy- 
hledavacimu argumentu, tj. zéznam se stejnym paradovym cislem nebo se stejnou hodnotow klitového 
pole jako ma vynledavaci argument. 

Indixator zapsany v rubrice 56-57 se zapne, dojde-li-k chybé zaFizeni. Neni-li zadan a dojde k 
chybé, zobrazi se systénova zprava. 


6.11.8 EXFNT 


ios thin ee eonenennny anne emmmnnny 
Podminky | 1. operand | Operace | 2. operand Vysledek 7 Vysledkove | 
| | indikatory 
anennncntannmacannon ean eee: annunancnnen}aanmwnamen: ooo 
Pra a ins | ——— feria 


Prikaz EXFMT (execute format - provést format) zpdsobi zapis obrazovkového formatu na obrazov- 
ku a Cteni klavesového vstupu. Format zacina vidy Fadkem ¢. 2, Béhem provadéni formatu mize byt vy 
volan podpragram, v némz véak nesmi byt vydan dalSi pFikaz EXFMT; prikazy EXFMT tedy nemohou byt 
vnoravany do sebe. 
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4,418.1 2. operand (sloupce 33 az 42) 


V rubrice "2. operand" musi byt zapsano jméno zaznamu popsaného v ramci souboru na klavesnici 


aobrazovee (DEVICE(CRT)) prikazem pro popis zaznami na formula? i A, Toto jméno zéznamu nesmi byt 
pouzito jako jméno v prikazu pro vstupni format na formulafi Z. Zapis musi zaCinat ve sloupci 33, 


11.8.2 Wsledkove indikatory (sloupce 54 az 59) 


elle She y rubrice 56-57 umoziu je ZJistit, zda operator oéhem provadéni formatu 
stiskl nékterou funkcni klavesu nebo r@kterou funkéni klavesovou sekvenci. Povolené zapisy jsou 
tisla indikatoré 01 az 99. 

Rubriky 54-55 a 58-59 musi zistat prazdné, 

Tapne-li se indikator v rubrice 56-57 90 stisku nékteré z funkénich klaves, zapise se do stavo- 
vé prosénné, definvané kiicovym slovem STATUS v nrikazu pro specifikaci Wlohy, CtyFciferny kad po- 
dle této tabulky: 


ore 


| Kod | Funkéni xlavesa | 


puehannaaeiiaieieeeeeaieeetee 


| 9502 | SEL (vybér formatu) 
| 9503 | ZEN 


| FMT KROK (dali format) 
| 9506 | TISK 

9507 | IR.VS (zrus vstup) | 
| 9508 | KOR s drzenym premykem (xorekce zaznamu) i 


pera) TEXT 


, Dapne-li se indikator v rubrice 56-5? po stisku nékteré funkéni klavesové sekvence (FUNK a nék- 
tera klavesa horni Fady bez premyku nebo s drzenym hornim premyxem), zapise se do stavové proménné, 
definované kli¢ovym slovem STATUS v prixazu pro specifixaci Ulony, CtyFciferny kdd podle této tabul- 


iy: 


Kad | Funkéni <lavesova sexvence 


So 


| 9510 Prohlizeni druného soudoru (bez premyku) | 

9511 | Presun zaznamu (bez premyku) 

9512 | Navrat k transakénimu souboru {bez premyku) | 

| 9513 | Hledani odie obsanu (bez premyku) | 

| 9514 | Hiedani setiidéného obsahu (bez premyku> | 
9515 } Hledani podie isla zaznamu (bez premyku) 

{ 9516 | Zrugeni zaznamu (bez premyku) 
95:7 | Viozeni zaznamu (bez premyku) | 
9518 | Zobrazeni xontrolovanéno zaznam: (bez premyku) 


9519 | Hledani “once dat 
9520 | Zavedeni formatu 
9521 | Zména formatu 

9522 | Zobrazeni formatu (horni premyk) 
9523 | Zobrazeni dat (horni premyk) 
9524 | Avtomaiické oznateni (horni premyk) 
9525 | Smazani obrazovky (horni premyk) 
9537 | Konec prace (bez premyku) 


(horni premyx) 
(horni premyk) 
(horni premyk) 


Jestlize béhen Operace EXFMT dojde k chyné zarizeni, zobrazi se systémova zprava. 
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Dalsi informace jsou uvedeny u popisu <Jicovehe slova EQJCTL v odst. 4.1.5. 


6.11.9 OPEN 


pomtneeeeeepaenen en ene ony 


Podminky | 1. operand | Ooerace | 2. operand | Vysieaek | Vysiedkove 
| indikatory 
eeewenne: 4 oo | 
[ieoviand ! OPEN | Povinny L | Nepovinne | 
menewnannlaananannnnenteenanecentanacsnsconslnaceosnsanehuneusscnnans. 


Prikaz OPEN (open - otev*it) otevira soubor xe zoracovani. Neni-li zadano klicove slovo 
JOBOPT(*NOOPEN) ve formulari Z, oteviraji se véechny soubory xrome komunikacniho automat icky 
(t}. bez zaosaného prikazu OPFN) o@hem zahajeni vypoctu. 

Kazdy soubor musi byt pred zpracovanim otevien, at uz automaticky nebo prikazem OPEN. Je-1j 
pro disxetavy soubor pouzit jen orikaz WRITE, pak se pri otevieni soubor vymaze a délka zaznamu se 
upravi podle definice souboru. 


G.11.9.1 25 operand (sloupce 33 az 42) 


V rubrice "2. operand" musi oyt zapséno jméno oteviraného souboru definovaného na formulari A. 
Nesmi to byt jméno souboru na klavesnici/obrazovce (DEVICE(CRT)}, jméno transakéniho souboru 
(TFILE), koviravacina souboru (CFILE), tiskového neformatovaného souboru (PRTFILE), souboru praduké- 
nich statistik (SFILE) a tabulkového souboru. Tyto souhory se vZdy oteviraji oez prikazu OPEN, 


2 Wsledkavé indikatory (sloupce 54 az 99) 


Vysledkovy indikator zapsany v rubrice 56-57 (nepovinné) se zapne, neprobéhne-li operace OPEN 

lspéSné. Probéhne-ii uspeSna, indikator se vypne. Povolené zapisy jsou Cisla indikatord 01 az 99. 
Neni-li tento indixdtor zadan a operace GPEN neni Uspésna, zobrazi se systémova zprava, 
Rubriky 54-55 a 58-59 musi zistat prazdné. 


6.11.10 CLOSE 


Podminky | 1. operand | Operace 


aunaeaiie Utuecammnta teeeneaee 
2. operand | Vysledek Vysledkove 
indikatory 


a) a CA 


PFikaz CLOSE (close - uzav7it) uzaviré soupor 0 Zpracovani. VSechny soubory se uzaviraji auto- 
maticky na Konci vypoctu, jestlize nebyly vyslovné uzavreny prikazem CLOSE, 

Prikaz CLOSE vydany na xomunikatni soubor Neodpojuje komunikaéni linku. Linka se odpoji az na 
konci vypottu. Mezi prikazy READ a WRITE nebo WRITE a READ neni nutné uzavirat komunikacni soubor. 


411.1001 2. Operand (sloupce 33 az 42) 


V rubrice "2. operand" musi byt zapsano jméno uzaviraného souboru popsaného na formulari A. 
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Wsledkovy indikator zapsany v rubrice 56-57 (nepovinné) se Zapne, dojce-1i béhem uzavirani 
souboru k chybe. Probehne-li uzavirani bez chyb, indikdtor se wypne. Povolené zapisy jsou cisla 


indikétord 01 az 99. : 
Neni-1i tento indikator zadan a dojde x chybé, zobrazi se systémova zprava, 


Rubriky 54-59 a 58-59 musi zistat prazdné. 


butts 1 FEOD 


eeeneacennaponmanenanpancanennennnpe, 


les — rag 
Podninky | 1. f7 sr 2. operand | V¥sledek 
J 


| Vysledkove | 
indixdtory | 
H 


ccieied (ateietaletetaiaied ineriemeteiatatatatats peter 


eae 


Prikaz FEOD (force end of data - vnutit konec dat) signalizuje konec dat komumkacnino souboru, 
Plati jen pro komunikaéni soubor a smi byt vydan oouze mezi operacemi WRITE. Prikaz FEOD neadpojuje 
progra od souboru. Soubor mize byt nadie pouzit, aniz by muse] byt vydén prikaz OPEN. Dalgim pri- 
kazea pro tento soubor musi byt WRITE. 


bllt1.1 2, operand 


Vrubrice "2. operand" musi byt zapsano jmeno komunikacniho souboru gopsaného na formulari A. 


Gills? Wsledkavé indikstory (sloupce 54-59) M 


Wsledkovy indikdtor Zapsany v rubrice 56-5? (nepovinné) se Zapne, jestlize dojde k chybé béhem | | 
Operace FEOD, Probéhne-li operace FEOD bez Chyby, indikator se vypne. I 
Neni-li tento indikator zadan a dojde k chybé, zobrazi se systémova zprava. I” 
Rubriky 54-55 2 58-59 musi zastat prazdné. ) l) 


6.12, Prikazy pro nastaveni_indikatord 


Fae této skupiny Govoluji zaainat a vypinat libovoiné indikatory (01 az 99). Patri sem tyto 


it 

v 

SETON ~ Zapnuti indikator’ (set on), } 
~ vypnuti indikatoré (set off), 


ieiataaiatates Dee 


Operace | 


wom enen nnn yener ne nnennny 


operand | Vysiedek | Vysiedkové | 


Podninky 11, operand 
| indikatory | 


aon feemnnnaenna}vwnccencers 


SETON | | | Povinne | 


annannn feennenannnnfannnnnannenbonanaennannn{ 


cee) | SETOF | T Povinné | 
a a (eT | 


Formular € - vypocty 6-31 


Do rubriky “Vysledkové indixatory” zapiSeme (v Tibovolném poctu a poradi) indikatory, 
maji zapnout (SETON) nebo vypnout (SETOF). Lze zaosat az t/i Cisla indikatord 01 az 99, 
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které sp 


7. Prikompilované tabulky a algoritmy samokontroly 


Prikompilované tabulky se zarazuji do zdrojového textu Programu. Béhem pfekladu (kompi lace) 
se tyto tabulky stanou soucasti prelozeného programu. 
Prikopilovane tabulky jsou tri typi: 


~ datové tabulky, 
- prekodovaci tabulky, 
- taulky pro zménu tPidici sekvence. 


Datové tabulky se pouzivaji jako pr ikompilované obytejné tehdy, jsou-li mengiho rozsahu a malo- 


kdy se meni. “ ay! foe 
U periikai Pojem “datova tabulka" odpovidd pojmu "vektor" PouzZivanemu v popisech formulate C, 


7.1 Datové tabulky 


Wechny datové tabulky pouzivané béhem vypott 
{u, Organizace dat v prikompilovanych tabulkdch i v tabulkéch um 
fidi tenito pravidly: 


~Viechny polozky maji stejnou délku. 

~Wechny polozky jsou stejného typu (bud vSechny Eiselné nebo vSechny znakove). 

~kaidé tabulka musi byt popséna a pojmenovana v prikazu pro popis tabulky ve formulari A, 
~ Weechny tabulky popsané v ramci jednoho prikazu pro popis souboru maji stejny pocet polos 
~ Kata polodka jedné tabulky je umisténa v samostatném zaznamu (Fadku). 


Talat Definovani 


Komp: 


Pro zapis dat prikompilovanych tabulek neni ur€en Zadny specialni formula. Data s 
od |, pozice Fédku. Délka zaznamu (programavého Fadku) vSak nesmi prekrogit 20 pozic. Zépis: 
byt zarazeny Za vSemi Fadky formulard Ze dvarGe 

lapis datovych tabulek musi souhlasit 5 definicemi na formul 
fatulkového souboru musi odpovidat jeden titulni fadek, ktery musi 
Fédkd s datovymi polo3kami. Tento pocet musi byt roven po¢tu zadanému m slovem NUMENT y 
Kazu pro popis tabulkového souboru. Je-1i uvedeno méné téchto datovych #acki (nebo Zadné), 
58 do stanaveného poc tu automaticky Fadky obsahujici samé mezery {pro znakova data) nebo ni 
Ciselnd data), 

__V katdém Fadku musi byt zapsano po jedné polozce ze véech tabulek definovanych v rdmci tabul- 
lovtto souboru (prikazem pro popis tabulky), a to ve stejném pofadi a déice bezprostfedné za sebou. 
Y pevnia Fadku za titulnim Fadkem jsou tedy zapsdny prvni polozky vgech tabulek, v druhém Fadku dru- 
Me polodty viech tabulek atd, 

Titulni Fadek mi tento tvar: 


ému prikazu pro popis 
devan urcitym poctem 


(pro 


; 5 Sy eo eS 
01234547; 2901234567890 1224567890 1224547890 123456789 
weeee. 


koment a? 


> CTDATe Sn A 3 - x 
A znameng Compile time data" - data v dobé kompilace, 


*$8855555 redstavuje jméno souboru, které musi byt shodné s t v defanict ta- 
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bulkavého souboru na formulari A. 


ER te te Ralccegumn tor Vinee om es ee 
Indikator 
(CHECK ERROR) 


Hl | i 
| | 
| DSPATR LOOK SEQ _supsy 

ee | al EDTCDE PMT SETOF TADD 

SoubOA0 | Pant eee AUXDUP ERROR RANGE SETON. TSUB 
| F} fzdznamu/} | 1 T EXSR  RANGET SHIFT CHK 


| 
| 
| 


pole/ - 0 “INSERT RESET SUB konstanta 
tabulky “-S1, 
CHECK(AD AS BC BV BY DD DR FE Gxx + 
LC ME MF Mxx RE RL RZ) 


| 


[ote eenneeen wenn nennnes, 


1 2 


Prekadovaci tabulky poskytuji prostfedek pro prekddovéni datovych znaki v souborech ze stan 
dardniho znakového kidu DKOI do jiného znakového kodu nebo obracené. (Kéd DKOI je uveden v priloze 
1.) Prekodovaci tabulka mize urcit prekddovani jednoho znaku (napr. pismena A), nékolika znakd ne- 
bo v5ech znaki. Proto rizné tabulky mohou mit rdzny rozsah. Prekddovaci tabulky jsou vzdy prikompi- 
lovane. 

Pro zapis prekddovacich tabulek neni urcen Zadny formula?. Data se 
Délka zapisu vSak nesmi pfekrotit 80 Pozic na Fadku. 
1470, A ac, 


Kazda pFekddovaci tabulka musi byt identifikovana titulnim Fédkem tohoto tyaru: 


Zapisuji od 1. pozice Fadku. 
Zapisy musi byt zafazeny za vSemi tadky form- 


~ FIRANS znamend “file translation" - prekddovani souboru. 
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ys ddaji prekddovacich tabulek. K jednomu souboru mize 
ty saji tento tvar? 


a | Pasion 3 5 6 ? & 
12745678 rae 7890 1234567890 1234567890 1234567290 1224567890 1234567890 1224567890 


~ sesssss6 je jméno souboru, jehoz data maji byt prekédovana, a musi byt zapsino na formula?i A. 
Jnéno musi byt zapsano na kazdém Fadku, i kdy2 je Fadkd pro jeden soubor vice; Loe 

- yyy je Etverice hexadecimalnich Cislic, z nichz prvni dvojice xx predstavuje yn@jSi kod znaku na 
nositi dat v zarizeni (disketa, komunikacni linka apod.), yy predstavuje kod znaku V programu. Na~ 
priklad prekodovani znaku A z disketového souboru DATAQOO! na znak Z v programu zapiSeme takto: 


a q{ 


Ide C1 je vn8jSi kod (znak A) a E9 vnitFni kod (znak Z). 
UPOZORNEN | 


Nedoporucuje se prekddovavat soubory typu SCS (standard character set - standardni soubor zna- 
ii), které obsahuji Fidici znaky pro tisk. Tyto znaky by mohly byt prekédovdny a pak by mohly zpiso- 
bit chyby pri tisku. Podobné se nedoporucuje piekddovavat soubory obsahujici cisla ve zhuSténém de- 
fadickea tvaru nebo Cisla v binarnim tvaru. 


73 Tabulky pro. znénu Fidici_sekvenc 

Tridici sekvence je dana vnitinim znakovym kédem DKOI. Tuto tFidics sekvenci je moZno zménit 
pro potrebu  porovnavacich prikazd COMP, CAB, CABxx ve formulafi Ca klicového slova COMP ve formu- 
Wiay Programu mize byt zadina jen jedna tabulka pro zménu ttidici sekvence. 0 

Pro zépis tabulky neni uréen Zadny specialni formuld?. Data se Zapisuji od 1, pozice fadku, 


tani ae nesmi prekrocit 80 pozic na Fédku. Zapisy musi byt zafazeny za vSemi Fadky formu- 
yAal, 


i Kazdé tabulka pro zménu tPidici 


tu sekvence musi byt identifikovana  titulnim fadkem tohoto tva- 
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a eT 
is 4 5 é 7 Bf 
567890 1234567890 1224567890 1234567290 1234567890! 

4 


propose 


: 
fin ic 
2 cD os 


ALTSEQ| | komentar 


a 


ie 
et Ot os 


Za timto fadkem nasleduji dalSi Fadky urcujici zmény ve standardni tridici sekvenci y potfeb- 
ném poctu, Radky maji tento tvar: 


1 2 3 4 5 6 ig t} 
123456 | 78} 9012] 3456 | 7890 12345678901234567890 1234567890 1234567890 1234567890 1234567890 


ALTSEQ! xayy [xxyy foes 


£9, kde 
Ci je standardni kdd znaku A a E9 je zménény kod znaku A (tj. standardni kéd znaku Z). Chceme-li 


Jestlize chceme zménit standardni tridici sekvenci DKOI na tfidici sekvenci KOI8, pouzijene 
misto CtveFic hexadecimalnich ¢islic zdpis ASCII od pozice 9. K tomu ovSem stati jediny fadek za 
titulnim Fadkem, Pro tuto moZnost musi byt pri konfiguraci do systému zarazena kddova tabulka KOIg, 


7.4 Algoritmus samokontroly 


Pouziti Samokontroly umogfuje chrénit data pred chybami zpisobenymi pri viednickych tkonech 
nebo pri vk lédani z klavesnice. Samokontrola spociva v uplatnéni algoritmu, ktery ze znakd datového 
pole odvodi kontrolni znaky. Pri generatnich Operacich se vypoctené kontrolni znaky vkladaji do ur- 
€enych pozic datového pole. Pri kontrolnich operacich se vypottené kontrolni znaky porovnavaji se 
znaky na urCenych mistech datového pole. Nesouhlas pri kontrolni operaci zpdsobi zobrazeni systé- 
mové zpravy. 

Generatni Operace je zadéna parametrem Gxx klicového slova CHECK v prikazu pro popis pole na 
eas A. Kontrolni operace je zadana porametrem Mxx klidového slova CHECK. (Viz ted odstavec 

Pro samokontrolu lze pouzit budto jeden ze dvou Standardnich algoritm) (modulo 10 nebo modulo 
11) nebo specialni algoritmus, ktery programator Spocifikuje ve zdrojovém programs. Zpisob specifi- 
kace je popsan v nasledujicich odstavcich, Tento popis vSak neni minén jako pomoc pri navrhu algo 
ritmu, ale jen jako vysvétleni ke Specifikacim pro prekladac DE/RPG, 
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7Acl Pravidla 2 polmy 
Jadéni algoritmu samokontroly v DE/RPC je jednoduché, ale k pochopeni jeho €innosti je treba 

nit zakladni pravidla a pojmy pouzite pri popisu této Cinnosti. 

z 


-falové poley-na néz se aplikuje algoritmus samokontroly, mize obsahovat nejvySe 32 znakd veetne 
jednofo nebo dvou kontrolnich znaki. 


=Nonirolni znaky mohou byt umisteny kdekoliv v datovém poli, ale jsou-li dva, musi spolu sousedit. 


~ Wehodiskem k vypottu kontrolnich znaki jsou vSechny datové znaky v poli s vyjimkou téch, které 
jsou unistény ¥ pozicich urcenych pro kontrolni znaky. 


+ Pojen "nodul" je shodny 5 pojmem "zdklad ciselné soustavy". NapF. v Ciselné soustavé o zakladu 4 
jenodulen Eislo 4, NejvySSi Cislice v kaZdé pozici Cisla vyjadFengho v Eiselné soustavé o urcitém 
zikladu je 0 1 menSi nez hodnota zdkladu (modulu), Napriklad: 


zaklad 4) + 1(zaklad 4) = 10(zaklad 4). 
Jainile Cislo v urcité pozici dosdhne hodnoty zakladu, dochazi k pFenosu do pozice vyssiho Fadu, 
~Hodulea pro algoritmus samokontroly mize byt cislc od 2 do 127, 


~ Jednotlivym pozicim datového pole se pridéluji hodnoty zvané "vahy". Eiselna hodnota odpovidajici 
inal ¥ kazdé pozici se vyndsobi odpovidajici vahou a soutiny se vyhodnoti podle modulu, t}. v fi- 
selné soustavé o zakladu rovném zvolenému modulu, 


~Viha nize mit jakoukoliy Eiselnou hodnotu men3i nez zvoleny modul. Pozice s kontrolnimi znaky 
apozice, které nechceme brat do poctu, musi mit vahu 0. 


~ “Hodnatou isla modulo m" nazyvame zbytek po déleni isla hodnotou modulu. V Eiselné soustavé 
ozakladu m je to vzdy hodnota posledni cislice (jednotek). NapF. hednotou éisla 23(zaklad 7?) 
tolulo 7 je Cislice 2, 


~ Pojea ‘tislice" je v tomto popisu rozSifen tak, 3e znamend tislo vzniklé jako vysledek vypoétu 
W jedné pozici. NapFiklad: 


Blzaklad 20) 
+lzéklad 20) 


Wiziklad 20) 


oe tislic 8 ag Nedosahuje hodnoty modulu 20 a nezpisobuje tedy prenos do pozice vySsiho Fadu. 
oto pavadujeme Cisio 17(zéklad 20) za jedinou cislici. 

Py Abychon odstrani i dvojznatnost, pouzijeme k vyjadieni Eisel s jinym zdkladem nez 10 svislé 
Cary oddélujici jednotlivé zobecnéné eislice: 


{n3ln2)n1}n0| 


‘de'n znanend islo Oznatujici zobecnéné "jednotky", ni zobecnéné “desitky", n2 zobecnéné "stovky” 


Hebe WiddFeni isla 123(zaklad 25) je viceznatné, ale jakmile se doplni svislymi carami, je 


{2)3|(aéklad 25) = 678 
213] (2dklad 25) = 03 
123|(zékiad 25) = 48 


(1x625 + 2x25 + 3) 
(12x25 + 3) 
(1x25 + 23) 


14.2 Froces Samokontroly 
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V DE/RPG probiha proces samokontroly (tj. vypocet kontrolnich znakd) v Sesti hlavnich krocich, 
Kazdy nasledujici krok vychazi z vysledkd predchazejiciho kroku. Tyto kroky jsou znazornény na obr, 
7.4, Bloky obsazené v krocich 3 az 6 predstavuji rdzné procedury, z nichz je treba zvolit jednu. 


on 


[ Krok 1, Prevod znakd na Cislice 


[kro 2. Wypotet soucind (cislice x vaha) 


eo ee 


Krok 3. Soucet soucind | 


sere AMET a TITUS 


poocedeemny procedennny 


Soucet celych Soucet 
souting jednotek 


annem fomnenenninnnnmmnnn nm ee 


Krok 4. Vyhodnoceni souétu modulo m 


rate Tsaudet 7 Stridave | Jepeciaini| 
soucet a] | ous | | soucty | | Baz | 


Krok 5. Doplnék do modulu 


eee = Doplnék neni povolen, 
ema thm je-li hodnota modulu 
: 


Zadny dop}nél mensi nez 8. 


ees a | 


ape _ rend 


Krok 6. Prevod Eisel na znaky 


[rotenone nen: 


Jen P Pal | 
— 


ae Gia fo, 


1 
ar] ath d 


eae 
Jeden 
kontrolni kontrolni 
znak znaky 
mem pm L 


anon ncernveenene} 


Obr. 7.4 
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K zadani algoritmu samokontroly jsou treba tyto udaje: 


= hodnota pouzita jako modul, 
 yahy pro vgechny pozice datoveho pole, 

= poloha kontrolnich znaki v datovem poli, 

= procedury pouzité v krocich 3 az 6 procesu samokontroly, 


VdalZich odstavcich jsou popsany procedury pouzité v kagdém kroku proces! samokontroly. PF1- 
poninéne, Ze vysledky prvniho kroku jsou pouzity v druhém kroku, vysledky 
kroku atd. 


retiho kroku ve Ctvrtem 


Kazdy znak datového pole je preveden z vyjadteni v kddu DKOI na Cislo v hexadecimalnim vy jadre- 
ni tak, Ze zOnova Cast (bity 0 az 3) je odstranéna a Cislicova cast (bity 4 a2 7) je nahrazena podle 
tohoto pravidla: 

Jeli hodnota Cislicové casti 0 az 9, zistane cislicova Cast nezménéna, 

je-li hodnota Cislicové Césti A az F, nahradi se cislicova cast nulou. 


Wsledkem kroku 1 jsou dekadické cislice (pro kaddy znak datového pole jedna). 
Datové pole obsahuje znaky 1C#830, t}. v kodu DKOI: 
Fi C3 SC F8 F3 FO 
Odstranénim zonovych Gasti vzniknou hodnoty (hexadecimalni): 
1s) C8 3 “0 
Hesadecinélni Cislice vét3i nez 9 se nahrad{ nulou: 


130830 


Krok 2. Wpotet sou ind 


Mats cislice venikla v kroku 1 se vyndsobi svoji vahou, tj. vahou prislusné pozice datového 
pole, kaady 2 takto vaniklych sougind se vyhodnot podle zadaného modulu, tj. stanovi se zobecnéne 
Cislice ve vsech jeho Fadovych pozicich. 

ila 


TWoleny modul je 23, vahy jednotlivych pozic jsou zvoleny takto: 


pozice kontrolniho znaku 


0 
X1L X21 x6 x19 x5 x0 


11 63 0 152 


Uislice 2 kroku 1: 
Vaby: 
Souciny: 


Whar p 
Wodnocen souéinys lofts] 2/17} Jolol falas! folss| Jo}0] (zaklad 23). 
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Krok 3, Souget_soucind 


V tomto kroku je pouzita jedna ze tri procedur pro sCitani soucind vzniklych v kroku 2: 


- soucet celych soucini, 
- soucet jednotek, i : 
- dva soucty (soucet jednotek a soucet desitek). 


Vysledky téchto procedur (jakoz i procedur pouzitych v dalsich krocich) jsou vidy dvé Cisla, 
ktera oznatime jako P (pravé) a L (levé). 


Soucet_celych souind 


Settou se soutiny vzniklé v kroku 2 a soutet se ulozi do P. L se vynuluje. Pravidlo ndzene vy- 
jadfit takto: 


P (z kroku 3) = soucin + sougin + soucin + ... 
L (z kroku 3) = 0, 


Souciny z kroku 2 jsou: 
{ola1} J2]17] foo] Joj14) fol15] Jojo) ¢zakiad 23). 


P (z kroku 3) = |0/11]+/2]17]+/0]0/+|6]14|+]0/15]+]0/0] = [11/11] (zékiad 23), 
L (z kroku 3) = {0{0| (zaklad 23). 


Settou se zobecnéné jednotky vSech soucind z kroku 2 a soucet se ulozi do P. L se vynuluje. 
Pravidlo mizeme vyjadFit takto: 


P (z kroku 3) = jednotky + jednotky + jednotky + ..., 
(z kroku 3) = 0. 


Zobecnéné jednotky z kroku 2 jsou: 
[11] [17] Jol” [a4] [15] Jo} (zaktad 23). 


P (z kroku 3) = |11]/+|17]+/0]+]14]+]15]+/0] = J2|aa} ¢zékdad 28) 
L (z kroku 3) = [0/0] (zaklad 23), 


Dva si 


, Settou se zobecnéné jednotky védch soucind z kroku 2 a soucet se ulozi do P. Sectou se zobec- 
néné desitky vsech soudind z kroku 2 a souget se ulozi do L. Pravidlo mizene vyjadrit takto: 


P (z kroku 3) jednotky + jednotky + jednotky + ..., 
L (z kroku 3) = desitky + desitky + desitky + ... 


Priklad: 


Soutiny z kroku 2 jsou: 
Joj11] 2/17] Jojo} Jalsa} 10|15] Jojo} (zdkiad 23). 


P (z kroku 3) = [41]+]17|+]0]+)14]+] 15]+{o] = [2|11] (zaktad 23), 
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Ltzkroku 3) = f0l+/2]+/0]+/4|+/0]+]0l = [ole] (zaktad 23), 


V tonto kroku je pouzita jedna ze éty? procedur pro vyhodnoceni soucté P a L vzniklych v kroku 


= vyhodnoti se soucet Cisel P al (celkovy soucet), 

- wyhodnoti se soucet zobecnénych Cislic Cisel Pal (soudet ¢islic), 

-2tisel Pa L se vyhodnoti zvlast soucet zobecnénych Efslic sudych Fadi a zvlast soutet zobecné- 
njch cislic lichych Fadi (stFidavé soucty), 

- whodnati se Cislo P modulo 8 a €fslo L modulo 3 (specidlni 8 a 3), 


Wsledkem kazdé procedury jsou éisla P a L. Na zdékladu éiselné Soustavy pri interpretaci vys- 
ledku nezalezi. H 


Settou se Cisla P aL z kroku 3 a Ze souctu se odvodi hodnota modulo m, tj. vezme se posledni 
wobecnénd Cislice souctu (zbytek po déleni modulem m) a dosadi se do P. L se vynuluie. Pravidlo 
nizene vyjadFit takto: 


P (z kroku 4) = (P + L) modulo m, 
L (z kroku 4) = 0, 


Priklads 
IWoline vysledky Procedury "dva soucty” z kroku 2. 


? (2 kroku 3) = le 11] (zaklad 23) 
Utz kroku 3) = jo|8| (zaklad 23) 


PAL = |2|19] (zaklad 23) 


Plz kroku 4) = [2/19] (zéklad 23) modulo 23 
U(z kroku 4) = 0, 


cet Cislic 


ie se Cisla P a Uz kroku 3, se€tou se zobecnéné tislice éisla P+ a ze souctu Cislic se 
et Inota modulo m, tj. vezme se Posledni zobecnénd Cislice souctu (zbytek po déleni madulem m) 
1 se do P. L se vynuluje. Pravidlo mizeme vyjadrit takto: 


Pz kroku 4) = 


(1.€islice Efsla (PHL) + 2.¢islice Eisla (PHL) + vee) modulo m 
Utz kroku 4) 4 


0. 
Mitkas 


Holine wsledky Procedury "dva soucty” z kroku 3. 


Pz kroku 3) 
Ute kroku 3) 


2/11) (akiad 23) 
ole} (zaktad 23) 


PAL =) 


[19] (zaklad 23) 


caer 
Cet Cislic l2|+]19| = J21] (zaklad 23), 
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1| (zaklad 23) modulo 23 = 21, 


Sti idavé.soutty 


Settou se Cisla P a L z kroku 3. Sectou se zobecnéné Cislice sudych radi cisla P4+L, z tohoto 
souctu se odvodi hodnota modulo m (tj. vezmou se zobecnéné jednotky) a ulozi se do P. Dale se set- 
tou zobecnéné Cislice lichych Fadi Cisla P+L, precte se pr ipadny prenos vznikly pri vypoctu P, ze 
vzniklého souctu se odvodi hodnota modulo m (tj. vezmou se zobecnené jednotky) a ulozi se do L. Pra- 
vidlo mizeme vyjadFit takto: 


kroku 4) = (jednotky Cisla (P+L) + stovky Cisla (P+L) +...) modulo m, 
kroku 4) = desitky Eisla (PHL) + tisicovky Cisla (P+L) +... 
+ + prenos z vypoctu P) modulo m. 


P (z 
Liz 


Modul m = 6, 
(z kroku 3) = 1/45 (zaklad 6) 
L (z kroku 3) = |3]5/4| (zaklad 6) 


Soucet P+L = |0|5/4{3| (zaklad 4) 


Soucet jednotek a stovek = 345 = {1]2| (zaklad 4), prenos = 1. 
Soucet stovek, tisicovek a prenosu = 4+0+1 = 5 = |5| (zaklad 4). 


P (z kroku 4) = |1/2| (zaklad 6) modulo m = 2 
L (z kroku 4) = |5] (zaklad 6) modulo m = 
idlni 8 a3 


Z Cisla P (z kroku 3) se odvodi hodnota modulo 8 (tj. Cislo P se vyjadri v Ciselné  spustavé 
0 zékladu 8 2 vezme se jeho posledni fislice) a ta se ulozi do P (z kroku 4). Z €ista L (z kroku 3) 
se odvodi hodnota modulo 3 (tj. cislo L se vyjadri v Ciselné soustavé o zakladu J a vezme se jeho 
posledni Cislice) a ta se ulozi do L (z kroku 4). Procedura “specialni 8 a 3" nembze nasledovat za 
Procedurou "celkovy soucet” z kroku 3. Pravidlo mizeme vyjadrit takto: 


P (z kroku 4) = P modulo 8, 
L (z kroku 4) =L modulo 3. 


2{11] (zaklad 23), 
0|8| (zaklad 23), 


P (z kroku 3) = 
L (z kroku 3) = 


(zaklad 8), 


11] (zaklad 23) = 57 = |?7|1| 
= |2|2] (zaklad 3). 


|2| 
jo|8| (zaklad 23) = 8 


P (z kroku 4) 
L (z kroku 4) 


7{1| (zaklad 8) modulo 8 = 6 
22] (zaklad 3) modulo 3 = 2, 


nék do modulu 


pl 


V tomto kroku 1ze vybrat jednu ze dvou procedur: 
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- vypocitat doplnék do modulu (doplnék) , 
~nechat hodnoty beze zmény (Zadny doplnék). 


Dope 

Vypocte se doplnék tisla Piz kroku 4) do hodnoty modulu m, odvodi se hodnota modulo ma ta se 
ulozi do P. Vypotte se doplnék Cisla L (z kroku 4) do hodnoty modulu m, z n@j se odvodi ‘hodnota mo- 
dulo ma ta se ulozi dol. Tato procedura nemize nasledovat za Procedurou "specialni 8 a 3", jest- 
lize modul m je vétSi nebo roven 8, Pravidlo mizeme vyjdrit taktos 


(m - P) modulo m, 
{m- L) modulo m. 


P (z kroku 5) 
L (z kroku 5) 


wu 


Priklad: 
Modul m = 23. 
P (z kroku 4) = 21, 
L (z kroku 4) = 0. 
P (z kroku 5S) = ( 23 - 21) modulo 23 = |2| (zdklad 23) modulo 23 = 2s 
L (z kroku 5) = ( 23 - 0) modulo 23 = |1]0] (zaklad 23) modulo 23 = 0. 


tan dopndk 


Cisla P a L z kroku 4 zistanou beze zmény. 


V tomto kroku 1ze vybrat jednu ze dyou procedur: 


= jenP, 
-Pal. 


Obé Procedury mohou produkovat dva kontrolni znaky nebo jeden kontrolni znak, podle volby. Je-li za- 
dan jen jeden kontrolni znaky je to pravy kontrolni znak. 


JenP 


.,. Kontrolni znaky se odvozuji jen z cisla P z kroku 5. Pravy kontrolni znak se odvodi tak, 3e 
Cislo Pz kroku 5 se vyjad?i v dekadické ¢ciselné soustavé (se zakladem 10), vezme se jeho posledni 
Cislice (jednotky) a ta se dop)ni zleva hexadecimalni Cislici F. Levy znak se odvodi tak, ze z éisla 
P vyjadFeného dekadicky se vezmou zbyvajici ¢islice vySSich Fadi (desitky a stovky), vyjadri se 
V hexadecimalni soustavé (se zékladem 16) a takto vznikld hexadecimalni Cislice se dopini zleva 
hexadecina ni Cislici F. Ponévadz modul m, a tedy itislo P, mize byt nejvySe 127, mize byt cislico- 
va Cast levého kontrolniho znaku nejvySe 12, tj. hexadecimdlné C, Je-li modul m cislo 99 nebo mensi, 
vyjdou kontrolni znaky vidy jako dekadické Cislice v kédu DKOI. Pravidlo mizeme vyjadrit taktor 


Pravy kontrolni znak = X'FO' + (P modulo 10), 
Levy kontrolni znak = X'FO' + (P - (P modulo 10)) hex. 


Priklad: 


Modul m = 127, 
P (z kroku 5) = 127, 
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Pravy kontrolni znak = X'FO' + 7 = X'F?' = 3, ? 
Levy kontrolni znak = X'FO' + X'C' = X'FC’ (nezobrazitelny znak). 


Kontrolni znaky se odvozuji z obou ¢isel P aL z kroku 5. Pravy kontrolni znak se odvodi tak, 
ze z Cisla P z kroku 5 se vypoéte hodnota modulo 16, vyjadri se v hexadecimalni soustavé a doplni 
zleva hexadecimalni ¢islici F. Levy kontrolni znak se odvodi tak, Ze z Cisla L z kroku 5 se vypotte 
hodnota modulo 16, vyjadFi se v hexadecimalni soustavé a doplni zleva hexadec imalni Cislici F. W- 
sledek v kddu DKOI nemusi mit grafickou reprezentaci. Pravidlo mizeme vyjadrit takto: 


Pravy kontrolni znak = X'FO’ + (P modulo 16) hex., 
Levy kontrolni znak = X'FO' + (L modulo 16) hex. 


Piiklads 

P (z kroku 5) = 95, 

L (z kroku 5) = 49. 

95 modulo 16 = 15 = X'F', 
49 modulo 16 = 1 =X'1', 


Pravy kontrolni znak = X'FO' + X'F' = X'FF', 
Levy kontrolni znak = X'FO' + X'l' = X'F1', 


K definici algoritmu samokontroly neni predepsin zadny specidlni formulai. Udaje se zapisuji 
od 1. pozice fadku; délka zépisu vSak nesmi prekrocit 80 pozic na radku. Zapisy musi byt zarazeny 
za vSemi Fadky formulaf Z, A aC. 

V programy lze definovat nékolik algoritmd samokontroly. 

Definice algoritmu samokontroly musi byt zahdjena titulnim fadkem tohoto tvaru: 


2 3 4 5 6 7 8 
1234567890 1234567890 1234567890 1234567890 1234567890 1234567890 1234567890. 


1 
12134567890) 


446] SLFCHK xx’ 


komentar 


~ xx znamena Cislo od 01 do 09 nebo od 12 do 99. Toto cislo se pouziva v parametrech Mxx, Gxx klico- 
vého slova CHECK v prikazu pro popis pole na formulari A. Cisla 10 a 11 jsou vyhrazena pro stan- 
dardni algoritmy "modulo 10" a "modulo 11", 


Dalsi Fadky jsou celé (od sloupce 1 do sloupce 80) k dispozici pro zapis klicovych slov a je- 
jich parametr’ ve volném formatu. Klitova slova pro definici algoritmu samokontroly jsou tato: 


MoD - ur€eni hodnoty modulu (modulus - modul), 

DISP - uréeni pozice kontrolnich znakd v datovém poli (displacement - posunuti), 
WEIGHTS -urceni vah jednotlivych pozic v datovém poli pro krok 3 (weights ~ vahy), 
OPT ~ volba variant (procedur) pro kroky 3 az 6 (options - volby). 


Pro zapis kligovych slov a parametrd Plati obvykla pravidla véetné pouziti pokracovacich znakd 
(odst. 3.2.4 a 3.1.1). 
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MOD ( Eislo ) 


Klidové slové MOD (modulus > modul) uréuje hodnotu modulu pro vypocet kontrolnich znaki. 

Paranetr "Cislo" je povinny a musi byt vyjadFen celym Cislem od 2 do 127, Mezi timto cislem 
a Cislen xx v titulnim radku (##SLFCHKxx) neni Zadny vztah. 

Definujeme-1i vlastni algoritmus samokontroly, je klicové slovo MOD povinné, 


DISP ( éislo ) 


Klitové slovo DISP (displacement - posunuti) uréuje relativni pozici pravého kontrolniho 
znaku y datovém poli vzhledem k posledni pravé pozici datoveho pole (smérem vlevo), 

Parametr "Cislo” je povinny amusi byt bud 0 nebo celé ¢islo od 1 do délky pole. Hodnota 
0 znanend, Ze v poli neni zadny kontrolni znak. Hodnota 1 Znamena, ze pravy kontrolni znak je 
unistén v posledni pozici datového pole ypravo, hodnota 2 znamena predposledni pozici atd, 

Neni-li kliGové slovo DISP zadéno, dosadi se standardni hodnota . 

Poznamka: Delka pole zadana na formulari A zahrnuje kontrolni znaky. Operator musi vlozit 
vsechny znaky véetné kontrolnich. Jestlize je zadino klicové slovo CHECK(Gxx), nahradi se znaky 
viozené na mista kontrolnich znaki vypoctenymi kontrolnimi znaky, 


WEIGHTS ( vaha vaha vaha ... ) 


Klitové slovo WEIGHTS (vahy) urcuje vahy pro jednotlivé pozice datového pole, Vahy se pouzivaji 
pri vypoctu kontrolnich znaké v kroku 3 procesu samokontroly, . 

Paranetr "vaha" mize byt az 32. Parametr "vaha" mize byt libovolné celé ¢islo v rozsahu od 0 
do m1, kde m je hodnota modulu. Vahy odpovidajici pozicim s kontrolnim Znaky, musi byt nulové. Nu- 
lové vaha_ mize byt zadéna také pro libovolnou Jimou pozici, kterd se nema uplatnit pri vypoctu 
kontrolnich znakd. 

Pravy konec parametrd se zarovna s pravym koncem datového pole. Je-li zadano vice vah nez je 
pozic v datovém poli, prebytecné vahy zleva se neuplatni, 

Definujeme-1i vlastni algoritmus samokontroly, je klicové slovo WEIGHTS povinné. 


OPT ( ‘abcde’ ) 


Kligové slova OPT (options - volby) umoziuje zvolit vhodné procedury pro vypocet kontrolnich 
anak v krocich 3 az 6 Procesu samokontroly. 
, Paranetr "abcde!" je Fetézec pati znakd (véetné mezerovych) uzavieny v apostrofech. Jednotli- 
ve znaky znamenaji tyto volby: 


a> procedury v kroku 3; mezera - soucet celych soucind, 
U - soucet jednotek, 
D - dva soucty, 


b - Procedury v kroku 4: mezera - celkovy soucet, 


D - souget Cislic, 
K - stFidavé soucty, 
E - specialni 8 a 3, 


C = procedury v kroku 5: mezera - Zadny doplnék, 
C - doplnék do modulu, 


qd - Procedury v kroku 4: mezera - jeden kontrolni znak, 
2 - dva kontrolni znaky, 


© ~ procedury y kroku 6: mezera - Pal, 
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D - jenP. 


1 b y li Fetézec samé mezery. 

slove OPT mize byt vynechano, obsahuje: mem : 

i i pF iklady cethite algoritmu samokontroly se normaln® nezapisuji do zdrojoveho prog- 
jenom, jak jsou definovany standardni algoritmy modulo 10 a modulo 11, 


Nasledu)1 
ramu. Tlustruji 


<4 4 3. 


#HSLFCHKI0 
i 

| 

| 


Obr. 7.5 
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omen 


18. Prekiadaé pi RPG | 


Prekladac jazyka DE/RPG je dodavan na disketé. Tato 


e n disketa musi byt pred prekladem 
do disketove jednotky a prekladac musi byt zaveden pomoci 


e vlozena 
Odpovedi na standardni vyZvu. 


| 0 0001 A 16 40 


Jnéno programu: 
| Adresa jednotky: 
| Cislo oddilu: 


| 
| C2715 Sxx. xxx Stiskni VSTUP 


eecenenn nner nn em enen: 


Obr. 8.1 


Pozmamka: Uzivatel by si mal pred zahajenim 


E prekladi poridit zalozni kopii této diskety. Dis- 
keta, na kterou kopiruje, nemize mit format 1. 


a. sisbeRes 

Jnéno ofekladace je SYSDERPG. Prexladac vyzadu)je xe své Cinnos 
likosti alespoh 9 K slabik. Béhem prekladu nesmi byt disketa obsanuj 
tove jednotky. 

Na zacatku prekladu zobrazi prekladat vyzvu x zadani soubor 
jsou znazornény v nasledujicim textu. do pole pro jméno souboru 1: 
adresu zarizeni lze vlozit oud 4 Znaky fyzické adresy nebo 
kratSi nez pole je treba vkladat 


ti programovy oddii pamét: o ve- 
ici prekladac vyjmuta z diske- 


a rezimi pro ofeklad. Tyto vyzvy 
ze viazit az 16 znaki; do pole pro 
2 znaky logického identifikatoru. Tapisy 
zleva. Ve zbytku pole vpravo musi byt mezery. 


812 Souoory pro_ 


_ Tikladnim vstupen pro prekladaé je zdrojovy program ulozeny na disketavem souboru. Prekladac 
2potatku zobrazi vyzvu k zadani Udaji o tomto souboru. 


Soomnnnnencccnnanaananaanensaunananemenwannaannnenenmy 


C271 prekladaé DE/RPG | 
Vloz Gdaje o ZDROJOVEM SOUBORU. H 
Jnéno souboru: — SYSIN | 
Adresa Jednatky: 4400 | 

J 


Stiskni VSTUP 12-21 


ee ee erm arene ener 


Obr. 8.2 


iN Viozte disketu se zdrojavym programem do disketové jednotky a odpovézte na vyzvu. Predepsane 
M8N0 Soudoru a adresuy zarizeni nizete zménit. 
Pro ds 


Oru Operatni oamé 
soubory) 1 pamet i 


ee Douziva prekladaé pracovni pamet na disketé, Tato pamét (pracovni 
Prasima  mezivysled 


ky Vv urcitych fazich prekladu a poskytuje je v jinycn fazich k dalsimu 
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zpracovani. Po skonéeni prekladu se mezivyslediy z pracovnino prostoru vymazou. 


Prekladaé zobrazi vyzvy k zadani udaji o pracovnich souborech. Prvni z técnto vyzev vyzaduje 


Udaje o pracovnia souboru ¢. 


0 0001 A 16 E2 


Vloz fdaje © PRACOVNIM SOUBORU i. 
Jméno souboru:  SYSUTOOL 
Adresa jednotky: 4400 

Stiskni VSTUP 


fo. 
| 2 
| C271 prekladac DE/RPG 


| 
at 


eee 


Opét mizete pri odpovedi zménit piedepsané jméno souboru a adresu zarizeni. Jestlize pouzijete 
standardni udaje, prid@li pracovni prostor na diskete prekladac. Neni-li zadany soubor na disketé, 
mizete bud zadat jiny soubor neoo necnat prekladac, aby tento soubor vytvoril. Pracovni soubory vy- 
tvorené prekladacem jsou po prekiadu zruseny. 

Dali vyzva vyzaduje Udaje o pracovnim souboru c. 2. 


0 0001 A 16 E2 


Se 


Vloz tidaje o PRACOVNIM SOUBORU 2. 
Jméno souboru: — SYSUTO02 
Adresa jednotky: 4400 


| C271 prekladaé DE/RPG | 
Stiskni VSTUP 12-23 | 


Na tuto vyzvu odpovite stejné jaxo u pracovniho souboru ¢c. 1. 

Poznamka: Jsou-li pracovmi soubory alokovany predem (pomoci programu SYSLABEL), nesmi v nich 
byt definovan znak neplatnosti zaznamu. 

Disketa by méla cyt nasazena predtim, nez doxoncite odpovédi na vyzvy. 


Hlavnim vystupem z prekladu je soubor obsahujici prelozeny program. Prekladat k jeho zadani 
zobrazi vyzvu. 


| C271 prekladac DE/RPG 
| Vloz Udaje o CfLOVEM SouBORU. 
| Jméno souboru:  SYSQUT 


| 
| Adresa :ednotiy: 4000 
Stiskni VSTUP 12-24 


Obr. 8.5 


Opet aizete ari odpovéd: zménit jméno souboru i adresu jednotky. Timto jménem se prelozeny 
Program pozdéji vyvolava ke spusténi. 

V pribeéhu prekladu se cte kazay zdrojavy prikaz. VSechny prikazy kromé poznamkovych se analy- 
zuji, zda jsou zapsany spravné podle formalnich oravidel Jazyka. Kontroluje se syntakticka spray- 
most, slucitelnost \li€ovych slov a parametrd, soulad v definici a pouziti jmen apod. Chybam z)i3- 
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ténym v tomto procesu se pridéli Cisla a texty chybovych zpray, které Pak tiskne v protokol 
OkOlU .o pre- 


kladu. 


Po adpovedi na vyzvu | zadani ddajd pro soubor s prelozenym 
7 vob + re Programem 
ni zpdsobu tisku arotokolu o prekiadu. | S@ zodrazi vyzva k zadé- 


{ 0 0001 A 16 40 ae verte 


Volba 2rovadeéni orotokolu. 
1, Na tiskarnu 4. Na tiskarnu (zastaveni pr é | 
2 Pri chybe) 
| 2, Na disketu ! | 
| 3, Bez protokolu (1-3: Zastaveni jen pri tazkych ch 
| Zvol moznost: Stiskni VSTUP A mach 
aeenneennannnnnansennwenenmnsannnenennnannneecnnennan, J 


Obr. 8.6 


Po vybéru volby 1,2 nevo 4 zobrazi prek)adaé vyzvu k zadani udayd o tiskovem souboru 


= 
{0 0001 A 16 £2 


Anan ene nenmnney 


| (271 prekladac DE/RPG 
| Vioz udaje o SOUBORU PRO PROTOKOL. 
| Jnéno souboru: — SYSPRNT 


Obr. 8.7 


t 5 pane PRE = 
M1 volae 2 (protocol na disketé) musi byt disketovy soubor predem alokovan s délkou zéznamu 


Po dokone i zt C é r 
onceni uvodnich vyzev se zanocne sxutecny preklad a zobrazi se tato zprava: 


(on nennnennwnnnawneenennnnneccnenennccencnn, 


[9 


oe ance, 


es ~ prekidcat v innosti 


| 
= 


<a eee en 


Hle-li zagana 
sla a texty ehybovich zp i, 2 neoo 4, otiskne se zdrojovy programs Do protokolu jsou zahrnuta 
aratoe tide che Fo z)i8téni téZxych chyd se prekiaa zastavi, jakmile dokon¢i tisk 
na valba 4a byly.z en jasexoliy chyby, vyda prekiadac vyzvu 


* volde Kracovat : 
1 2a 20kracovat ¥. prex sacu, Ci oFeK sad uxoncit 


Prekladac DE/RFG 8-3 


[a a 
| 9 0001 A 16 40 
| 
| V programs jsou chyby. 
Moznost1 jsou: 
1. Ukonéit preklad | 
2. Pokratovat v prekladu 1 
Zvo] moznost: Stiskni VSTUP 12-06 | 


Obr. 8.9 


Jestlize dojde k chybé na vystupnim souboru s prelozenym programem, mizete stisknout klavesu 
NUL a oak utinit novy pokus nebo alokavat novy soubor. 


8.3 Chyby ve zdrojovem progr amu 
Ipravy o chybach ve zdrojovem programu se déli na tri skupiny: 


- zpravy o tezkych chybach, 
- zoravy o stfednich chybach, 
- informaéni zpravy. 


U kaZdého isla nlagené chyby je vytistén kod odpovidajici skupiny: T, S nebo I. 

Tezke chyby brani vytvoreni pfelozeného programu. Stredni chyby pochazeji z méné zavazneho po- 
ruSeni pravidel jazykxa. Informacni zpravy upozorfuyi na sxutecnosti, které by mohly (ale nemusely) 
pdsobit potize pri vypocttu. 

Po UspéSnem prekladu se zobrazi tato zprava: 


(Conca naann nnn n nme ne enema nn nnenanenenennanenannnencnnanncennencenen= wennny 
| 0 0001 A 02 00 
| Konec prekladu. | 
| V programu nejsou chyby. | 
ie Stiskni VSTUP 12-08 | 

Jee nnenaneeenenceeencennennnn en: ae eee eeennnnen en ennenaneennennaennane: | 


Obr. 8,10 
Jestlize se vSak vyskytly chyby, zobrazi se tato zprava: 


| iaiiaiaeienaitaetealehaetaeateeteneaannaenananememmmmmmemamemtatamnmmetemenneemtanenean 


| 0 0001 A 02 00 


Konec prekladu. 
Pocet chyb a informacnich zprav: 


Stiskni VSTUP 12-10 
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Irojovy program, chybové zpravy a ostatni informace jsou v protokolu 


obsatujicich 80 pozic. z L. 
Uplny seznam chybovych zprav je uveden v priloze 5, 


rozmistény na Fadcich 


Na obr. 8.12 je pFiklad protokolu o prekladu programu s chybami. 
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0000 LASHES EHH HEHEHE HEHE HEHEHE HEHEHE HEHEHE EEE EEE HEE ES HHHEHEE 


000027# Porizeni stavi * 
00003 3H HBA H HEEB HEHEHE HEB GHEBEHHHBIEE HEHEHE HHEHEHHEHEHBHEHHHRHBHHEHHEE 


00004ZJ PORSTAV TFILE(STAVY) ENTRATR(CS) 
Q0005Z A1OBR 1E Al 
00006Z R AL 
00007A F OBRAZ 60 DEVICE(CRT) 
900084 R OBR I 
00009A 4D 03 02 PMT(Cisio skladu) 
00010A 5 03108 PMT(Cislo materialu) 
000114 9D 3 03 15 PMT(Stav mnozstvi, 3 d.m.) + 
OOOLIA CHRCK (RB) 
DE 032 
00013A 9D 3 03 26 PMT(Min. stav) CHECK(RB) 
00014A 9D 3 04 02 PMT(Max. stav) CHECK(RB) 
000154 9D 3 04 13 PMT(PFijem mnozstvi za posledni obt+ 
000154 dobi) CHECK(RB) 
000174 9D 3 04 24 PMT(Vydej mnozstvi za posiedni ob+ 
00017 dobi) CHECK ( RB ) 
000194 4D 0 05 02 PMT(Datum pos]. vydeje - RRMM) 
00020A F STAVY 60 DEVICE (DISK) 


ADR. KONSTANTA 

02F0 'Cislo skladu' 

O2FC 'Cislo materialu' 

0308 'Stav mnozsivi, 2 d.m.' 

0320 'Min. stav’ 

0329 "Max. stav' 

0332 'PFijem mnozstvi za posledni obdobi’ 
0354 'Vydej mnozstvi za posiedni obdobi' 
0375 ‘Datum pos}. vydeje - RRMM' 


ADR. JMENO 


RADEX CHYBA 
00010 0842 


Pocet chyb v programu: 002 


TEXT CHYBOVE ZPRAVY 
DE $ 0032 Chyba v klicovem siové, konstanté nebo parametru na formulari A 
DE S 0842 Caybna pozice; ignorovana 
MAPA PRELOZENEHO PROGRAMU 
VSTUPNI BODY RUTIN 
ADR. JMENO POPIS 
0574 = R699 Zpracovani konce prace 
OSF4 = RGB = Alokace fyzickych V/V-oblasti 
0604 —-RGO1—Rutina pro vnajéi stavy klavesnice 
0994 R631 Rutina oro vneisi stavy diskety 
OFC = RGJ&-Rutina pro Fizeni disketavého V/V 
OA94 = RESO) Ovladaci rutina pro V/V 


OPES stun. bod ovJadaci rutiny fora. Z 
0F94 = Vstupni bod programy 
5.376 Délka programy 


Obr. 8.2 
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[TPP tenn en eneennennn. 


fi" Operaéni viastnosti 


ntedbeben tall cae, 


(ISIS ial _DE/RPG-programu Zavisi na Zdrojovych prikazech, xteré POPisuji Glohu. PFi 
abletia ardbehu vypoctu maji vSak programy jisié viastnosti spolecné. Spoletne viastnosti jsou 
sopsany v této kapitole. 


9.1 Tavedeni_program 

Provorovani DE/RPG-program’ predpoklada, ze v systému je pritomna jedna z variant SYSCFBO{ 
SYSOFBO2 nebo SYSCFBO3 programi spolecnych funkci volenych pri Konfiguraci (generaci) systemu (viz 
prirutku "Consul 2715 - Prirucka systémového programdtora"), 


9.1.1 Velikost_paméti_pro_p 


Délka rogram uvedend v protokolu o prekladu npznamena velixost oddilu nutnou k pravozu pro- 
gram, Pra urceni velikosti oddilu je treba pricist k délce z Protokolu jesté délku fyzickych ystup- 
nich a vystupnich oblasti pro disketové soubory. Délka fyzické oblasti pro soubor zavisi na délce 
ziznam, tyou vymény dat a velikosti sektoru u disxet Pouzivanych pri vypoétu. Tak Program, ktery 
ydanéa oddilu normalné pracuje s disketou rozdélenou na 2Séslabicne sektory, nemusi v tomto oddilu 
fungavat s disketou rozdélenou na 1024slabicné sektory. 

Kaidy soubor se zakJacnim typem vymény dat, popF. s typem vymény H, vyzadu i 

: d : P d je fyzickou vstupni/ 
Mvjstupni oblast o délce 128, pop’. 256 slabix. Soubor s typem vymeny Tipatyebuje pamét o dvi een 
m2 délce sektoru (pro sektory délky 256 slabix je treba fyzicka vstugni/vystunni oblast délky 512 
Fee rhe delka sektoru neni sudym nasobkem délky zaznamu (délky zaznamu 2, 4, 8, 16, 32, 

i 128 a 256 slabik odpovidaji sektoru délxy 254 slabix). V druhem pFipade ci a : 
ama. y k) Pripade staci fyzicka oblast 

Jeli délka zaznamu vetsi nez délxa sektoru, musi byt fyzicka vstupni/vystupni oblast tak 
velka, aby pojala minimalni potet sektord potrebnych k tomu, aby byl zpracovavany logicky zaznam 
wae vere ea. Napri<jad 300slabicny zaznam na disketé s délkou sektoru 256 slabik 

ue yaickou oblast o délce ti sektord (768 slabik), protoz nors Fipadé mize za 
ante ee lie y Protoze v nejnorsim pripadé mize zaznam 

Tansakni soubor {TFILE) ma vidy dvé y a, Ze dé c 

‘ 1 ly dvé vstupni/vystupni oblasti. To znamena delk. 
podle predchozich Pravidel musi byt zdvojnasobena. ‘Musee 
Wyse uvedené vypoéty provedeme pro kazdy disketovy soubor v Programs a soucet takto ziskanych 


lek oFigteme k délce programy rotokoiu. Tak ziskame minimalni vi é 
z NK k Jn ixost oddilu, v némz mize 
Pp 2 inima e] ’ 


9.2 Tahajeni vipat tu 


ja oP Dr 09am Zavecen do oddilu, pokusi se system otevrit vsechny soubory (5 vy~ 
ty na formilazi 7. ¢ recent zadano klicove slovo JOBOPT (+NQOPEN} Vv prikazu pro specifikaci Ulo- 
Sabor. V tonto Rei, postuone poner vyzvy k zadani jména souboru a adresy jednotky pro kazdy 
% 2obrazi fide in meio byt zarizeni s oteviranya souborem pripraveno i Cinnosti. Ve vyzve 
Detit, Adresa jednoti re 3 adress jednotty, jak oyly zadany v program. Operator mize tyto udaje 
lovickéhg identifitite, Je ESirMist ne hexadecimal ni Cislo vznikle oFipadne Odvozenim z dyvoumistneho 
Ste bylo zadgno dito apd any Prirazeni prostredk vytvorené pri konfiguraci systému. Je- 
-li oowus 0 Binrat JOBOP *NOPMT), vyzvy s@ nezobrazuji a Otevirani prabiha samocinne. 
e5 ilivesy Wi. Pot m pags uspesny, systém ‘obrazi chybovou zpravu, «tera size byt zruse- 
Loi OVE Soubory Ys. dy ig System zobrazi vy2vu k OPaKovani pokusu o otevreni souboru nebo k alo- 
J@-1i to nozné). 
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| 
Jestlize program pouziva transaktni soubor (TFILE), musi byt zvolen rezin vypoctu, Jestlize re- proseereee= is 
Zim neby] zvolen v programa (parametrem klicového slova TFILE), vyzve system operatora, aby jej zvo- | | Zim [Identifikator| Riséavalciags H 
lil. Rezimy, které lze zvolit, jsou tyto: i" (35-37) fpovinna pro dany ee 
[Tromecmanyanennnnnnnnnnnnnnpamnnnnnnnanecnenenaceneneanneaeeamemang Vstup (enter) ae 
Parametr Rezim el Kopiravani (copy) | c 
v TFILE Kopirovani-niedani (copy-search) | c-S 
SS eS eg ag as ces Kopirovani-oFesun (copy-transfer) | c-7 
+ENTER Vstup (navy) Vytvareni nového souboru (dosavadni sae Tisk (priat) | Pp 
| Vv souboru jsou nedosazitelna). Prepocet se zobrazerim (rerun-disp)ay) | R-D 
#UPDATE | Zména Iména zyolenych zaznami v souboru. Tnena (update) | U 
#VERIFY | Kontrola Kontrola (prezkouSeni) dosavadnich dat Inéna-veladani (uodate-insert} | 7 
Vv souboru. Inéna-hledani (update-searc3) | 
#ADD Vstup (pFidani) | PFidavani zaznami k dosavadnim datdm | Kontrola (verify? { 
| (za konec dat). | Kontrola-korexce (verify-correct) ! 
| #RERUN Prepocet Automatické prepocitani (opétovné zpra- Kontrela~zobrazeni (veri fy- lay) { 
IL | covani) souboru. | Kontrola-vkladani (veri fy-insert} | 
ae em mend ee cen oe arenes en deta een a eee ee Kontrola-hiedani (veri fy-search) i 
& a Vypotet (execute) 
Datovy soubor ovlivnény tamito rezimy je disketavy soubor oznateny jako transakéni klicovye aneeewmeneenennn= 


slovem TFILE. 7 eat J Y ; 
Jestlize program neobsahuje transakcni soubor, vyzva k zadani rezimu vypoctu se nezobrazi a vy- 


: ihd vt ecatn (aires Wbinnéne Si, Ze rezim "Vypotet" je iediny, ‘tery nepouziva transakéni saubor. 
pocet probiha v tzv. vypotetnim rezimu. 


: Rezia vstup 
9.3 Pridbéh vypoétu te 
ttelen rezinu vstus (enter: £) Je vytvorit nebo rozsirit disketovy datavy soubor oznateny jako 
transakeni. V tomto rezime v¥idda ove-ator data pomoci klavesnice a Gorazovxaveno formatu. Vkladani 
i caele Orikazy pro popis 2aznamu a prixazy pro povis poli uvedenymi v ramci popisu souboru na 
Wavesnici a obrazovce. Jaxmile Je dokonceno viladam cat do Zaznamu, }@ zaznam prenesen na trans- 
f deni soubor. Rezim vstup se voli bud ve Zérajovem programy nebo ve vyzve pii zahai - 
pene ray i dat je k dispozici 15 rezimi vypoctu. Pravé platny rezim je indikavan na fa Wstup (novy)" nebo “vstup (pridani}"), ‘ ote idlgge 
ro ulohy poFizovani dat je k dispozici 15 rezimd v u. Pravé platny rezim je | Br ss |= sear ae a : 
ae ony a tena oa z ze ee Averett y J | i Poradi, v7 nenz }sou pouzivany rizne formaty Zaznami, Zav1S1 }ak na zapisu prikazi pro vstupni 
lorgat, tak na volbe operatora. Pry, formatem, ktery je k aispozici, Je vzdy ten, ktery je zadan 


prvnim arikazem pro popis formatu ve ,Zcrojovém programu. Pote Zavisi vyber formatu na programovanem 


Porat 2 na oouziti klavesavych funkci “dalSi format" a "vybér formatu"’. 


Vypotet probiha tak, Ze se postupné provadéji instrukce, které jsou vysledkem prekladu DE/RPG- 
~programu. Ulohy, které vyzaduji spolupraci operatora, jsou Fizeny zéasti programem a zcasti opera- 
torem, ktery pouziva klavesnici. 

Po potatecni volbé rezimu vypoétu mize operator kdykoliv béhem vypoctu rezim zménit (pomoci 


ate 2 d ape Ebel 
9.3.1 Rediny vypottu git ii k di spozici oro vklada Gat, dak organizace Obrazovxy, nastaveni klavesnice, 
BEzIRy VY POELU Byins ety a edicni kontroly jsou rizeny Zapisy v privazech pro popis poli, ktere jS0U uve- 
. s: +s 2 ns ae ranci i 5 is “ 
V nasledujici tabulce jsou uvedeny vsechny rezimy vypoctu, které jsou k dispozici v dlohach po- 7} Y rancl Zaznamu poimenovaného v pravé Zpracovavanem prikazu aro vstupni format. Ukazate] je 


ae ime pozici obrazovky, do riz ma byt vkladan dalsi znak z xlavesnice, 
es ri viladani (nebo zoracovani) vstupniho pole se data doCasné ukladaji, dokud neni zaznam do- 
oncen, Ukladana data 3s0u umistovana 


ia ue t tak, aby pri doxonéeni zaznamu byla v tom tvaru, v jakem maji 
apsana fa disketu. PFipadna transformace ze standardniho tvaru zaznamu se uskutechuje pri ses- 
favovani Zaznamu, 


Pr Conf 5 
een pace! vstupu se zaznam aresune na transakcni soubor. kazdy zaznam zapsany na disketu je 
paseti ve tvaru, jak ye zapsin na disketé. To umoziuje duplikovat data z odpovidajicich 


poric pri i : F : 
ioe eel Zaznamu Co prave zpracovavanéno zaznamu, jakoz 1 provest klavesovou funkci "dalsi 
fodle podminek zadanych v pf ikazu Pro vstupni format. 


ein lopiravani 


Retin kopirovanj =) . : 
tory Rhakenthy a (copy: €) dovoiuie operataravi zoorazit Zaznamy existujicino disketoveho sou- 
‘ovat na eee SO0lvovaci soubor (CFILE;. Qgeraior mize vyurat Zaznamy, ktere se maji sopi- 
Tt KCI Souoor (TFILE), Sousor, z nehoz se xopiruje, zistava nezmenen, ale data v zobra- 


a ed kooir, z 
Vansatinihg embaru. <O91rovanim modifikovana, Kooirovane ZaZnamy se pridavaj1 na konec 


mize byt vyvoldn Jen zZ rezimu vstupg kiavesovou funxci "prohiizeni druheno 
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souboru". Zaznamy se zprvu zobraz4}1 ve formatu 0, (Format 0 zobrazuje zaznam tak, jak je Zapsan 
na diskete, aitemz bazda pozice se povazuje za samostatne pole.) Operator mize zménit format 
pouzitim klavesave funkce “vybér formatu". Jsou-]i zaznamy zobrazovany $ pouzitim vstupniho formatu, 
plati pro n@ nastaveni «)avesnice a edicni Xoniroly popsane v prikazech pro popis poli. 

Po vyvolani ezimu kopirovani zobrazi system vyzvu zadajici operatora, aby uréil jméno souboru 
a adresu jednoty, odkud se ma}i data kopirovat, cimz je definovan kopirovaci soubor. 


Rezim ko} 


pirovani-h: 


Rezim kopirovani-a)edani (copy-search: C-S) dovoluje operatorovi vyhledat a precist zaznan 
z kopiravaciho souboru. Vyvolava se jednou ze ctyr klavesovych funkci z rezimi kopirovani. Jsou 


to tyto funkce; 


- hledani podle cisla zaznamu, 
- hledani podie obsahu, 

~ hledani setidéného obsahu, 
~ hledani konce dat. 


Behem vyhledavani je na stavovém fadku zobrazen xdd rezimu C-S. Po dokonceni nebo zrugeni vy- 
hledavaci Cinnosti se vyoocet v-ati do rezimu kopirovani. aL 

Pro kazdy tyo vyhledavani kromé niedani konce dat se nejprve zodrazi napoved zédajici opera~ 
Ora, aby zadal vyhledavaci aarametry. Napovédi se 115) podie klavesové funkce: Pri hledani podle 
la zaznamu napovéd Zada zadani por'adoveno Cisla zaznamu. Pri hledani podle obsahu mize operator 
zadat az thi znakove fetézce (uzavené v apostrofech) spolu se zacdtecnimi a popr. i kancovymi 
pozicemi; ty pak slouzi jako jeden vyhledavaci argument (maska), coz dovoluje vyhledavat zaznam 
podle obsahu tii nesousedicich coli, Pri hledéni podle setiidéného obsahu zada operator vyhledavaci 
argument (masku) jako jeden znakovy fetezec (uzavieny v apostrofech) a jeho zacatetni pozici; 
soubor musi byt setridén vzestupné podle obsanu odpovidajicich pozic v zaznamech. 


Rezim xopirovani-p*esun (copy-transfer: C-T) dovoluje xkapirovat zaznamy z kopirovaciho soubo- 
ru a pridavat je na konec transakéniho souboru. Mize byt vyvolan klavesovou funkci "“presun zaznami" 
rovnou nebo po predchozim vyvolani kiavesavé funkce hledani (neukoncené klavesou VSTUP). V prvnim 
pripadé se oravé zobrazeny zéznam kopirovaciho souboru prida za konec transaktniho souboru. V dru- 
hem prFitadé se za konec transakéniho souboru prida skupina zaznami od zobrazeného az po vyhledany 
zaznam kooirovaciho souboru; posledni zaznam (zadany v napovedi) se vSak jiz nepresouva. Vyhledava- 
ni (a soucasny ofesun) mize probihat jen po funkcich hledani podle cisla zaznamu nebo podle obsahu, 
a to smérem vored. Hledéni konce dat a hledani setiidéného obsahu nelze pouzit. Po skonceni presunu 
se vypocet vrati do rezimu kopirovani. 


Rezin tisk 


ReZim tisk (print: P) dovoluje otisknout zaznamy bez formatu, tj. ve tvaru, jak se zapisuji fa 
disketu v transakénim souboru. Mize byt vyvolan klavesovou funkci "tisk" z rezimd vstup, zmena, zme- 
na-vkladani, kopirovani, kontrola. Z rezind vstup a zména-vkladani mize byt vytistén jen jeden zaz- 
nan (ten, ktery 3e pravé zobrazen). Z ostatnich rezin’ mize byt vytistén jeden (pravé zobrazeny) 
zaznam nebo skupina zaznami (od prdvé zobrazeného dale}. Skupina zaznami se tiskne, seathie 
aktivovana funkce "automaticky vstup". Tisk se ukonéi, jestlize je prerugen stisken klavesy 2! 
nebo vypnutim funkce "automaticky vstup", nebo jestlize se vytiskne posledni zaznam souboru. Po 
uioreent tisku je zobrazen posledni tisteny zaznam a vyoocet prejde do rezimu, z nehoz byl tisk 
vyvolan. 
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Rezin orepocel se zobrazenim 


Rezin orepocet se zodrazenim (rerun-display: F-D) dovoluje automaricky zkontroiovat spy 
transakéniho souboru. Zpracovani probina od Zacatku do konce souooru, Fo apracovah: tea avnost 
mam Se nastavi rezim ystup. Rezim presocet S€ zobrazenim se voli oud ve zdrojovem ae te oa: 
ve wzve fi zahajeni vypoctu (volba “prepocet"), igramu nebo 

Mbsanuje-}1 soubor nekolik typi zaznami, musi oyt jejich formaty identifikovany v pF 
gro prohlizeci format odpovicayicimi testy. Zpracovani zaznamé }e podoané jako v ee Riakezsch 
stisku Klavesy VSTUP v orvni n0z1ci <azdého zaznamu. Provadéji se funkce zadané ieee sue 
Krone funkci, ktere ovladaji klavesnici a obrazovxu. Zaznamy, v nichz se pri tomto ieee slovy 
néjaké data, }sou na diskete aktual izovany (prensany na miste), Fri renee (eee : al 
{ napovedi na obrazovce, ale nen) treba Zaaneno zasahu oeratora, doxud nedojde « chybé Zyistnd : g 
poctea a jeho srovnanim s aaty prectenymi z diskety. V tom Prioadé je treba zasahu aperatora ks 
se vyoocet vratii z chyooveho stavu do rezimu prepocet se zobrazenim, » aby 


Rezim znena 


Rezim zména (update: U) dovoluje operdtorovi ménit (aktualizovat) data v transakcnim souboru 
Voli se bud ve zdrajovem programs nebo ve vyzvé pri zahajeni vypoctu (volba "zména"). V tomto rezinu 
se zobyazi zaznamy ofectene z tvansak¢niho souporu a operator v nich wize zmenit data tim, Ze d 
zvolenych ystupnich poli vlozi nova data. Zménénée Zaznamy Se za9)suji zpet na misto v souboru, od d 
byly pretteny. Data viladana do vstupnich poli jsou podrobena stejnym fo-matovym a edicnim ae 
Tam jako afi jejich porizovani v rezimu vstun (o0kud oyla nofizena stejnym programe). Gbsahuje-1i 
soubor nékol2k typi zaznami, mély oy byt sejich formaty ident f:kovany V prikazech pra arotiigeci 
mee ote mize taxé zvolit spravny format Klavesovymi funkcemi "dalsi 


Rezim znéna-vk ladani 


+ 


Rezim zména-vkladani (update-insert: U-1) Covoluje operatorovi vkladat nove Zaznamy dovnitr 
transakeni ho souboru (mezi existujici zaznamy). Vyvolava se xJavesovou funkci “vlozeni zaznamu" 
Etetiad ath fobrazen: zaznamu Je@ Zpocatku Nastaveno na format 0. (Format 0 zobrazuje vkladane 
zaznany tak, Jax maji byt zapsany na disketu, pricemz xazaa oozice se oovazuje za samostatne pole.) 
Sperdtor nize zyolit jany format klavesovou funci "daléi format" nebo “vybér formatu". ; 
Bre dat probina steyne Jako Vv rezimu vstup. Jestlize vsak pri vyvolani rezimu zinena- 

lam byla funkce "automaticka dupitkace/aresxak" axtivni a aylo viozeno vice zaznami nez eden 
re al funkce potlatena, dokud se vkladami zaznami nedokonci, ; j 

fe Bacar vlozeny nebo po preruseni rezimu, se vrati vypocet do rezimu zména. 
nai She ae jurcuje operator Vv odnovedi aa vyzvu, kterou vyda systém po vyvolani 
ae ladani. ladani zaznani do souboru Zac)na na miste oznacenem poradovym Cisiem zobra- 

: Stavoven Facku Pri vyvolani rezimu zmeéna-vkiadani. 
ase operator posledni veladany zaznam, (obrazovka se vymaze a na stavovém radku blika 

wr rezimu, dokud se viladani do souboru nedokonci. 

Bs Predpok] ade ime napriklad tuto situaci: 
ape Fadku je Zobrazeno aoradove Cislo 50 pFi zahdjeni rezimu zmena-vkladani. 

a ie vyzvu Odpovecel, ze chce vkladat 3 zaznamy. 
air) es eee! pron zaznaa) pivodni zaznam c 56 se premisti fa misto zaznamu ¢. 53 
itsisth 51, 92. Bice, na misto G50. Fro Cruny a treti vkladany zaznam se vytvor: prostor na 
af ela), feieviai cae Sg a daisi $e posunou seeren ke konci rozsahu souboru (EOE - end 
slatné zézsany ies ot Ne konci, jakm:]e }sou ke viladani vyuzity neyolizsi tri ne- 
vilédaciho ree fe pao manly ayt), e00 je tlize se posune cely zbytex souboru. Rychlost 
ton, Kolik ee ae Y 2nacne zavisia na tom, jax oliz<o u konce dat se Zaznamy vxladaji, ana 

} re neplatnycn zaznamd a jax isou rozmisteny. 
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Rezim zména-hledani (update-search: U-S) dovoluje operatorovi vyhledat zvoleny zaznam trans- 
akéniho souboru. Vyvolava se z rezimu zména jednou ze Cty? klavesovych funkci. Jsou to stejne funkce 


jako v rezimu kopirovani-hledani: 


- hledani podle Cisla zaznamu, 
~ hledani podle obsahu, 

- hHledani set*idéného obsahu, 
~ hledani konce dat. 


Béhem vyhlecavani je na stavovém fadku zobrazen identifikator rezimu U-S. Po dokonéeni nebo 
zruSeni vyhledavaci Einnosti se vypocet vrati do rezimu zména. ds 

Pro kazdy tyo vyhledavani kromé hJedani xonce dat se nejorve zobrazi napoved zédajici opera- 
tora, aby zadal vyhledavaci oarametry. Napovédi se 118) podle klavesové funkce: Pri hiedani podle 
éisla zéznanu napoved Z4da zadani Poracoveno Cisla zaznamu. Pri hledani podle obsahu mize Operator 
zadat az tFi znakové fetézce (uzavrené v apostrofech) spolu se zacatecnimi a popr. 1 koncovymi 
pozicemi; ty pak slouzi jako jeden vyhledavaci arqument (maska), coz dovoluje vyhledavat zaznan 
podle obsahu t/i nesousedicic; poli. Pri hiedani podle setiidéného obsahu zada operator vyhledavaci 
argument (masku) jako znakovy fetézec (uzavreny y apostrofech) a jeho zacatecni ,pozici; soubor 
musi byt setFidén vzestupné podle obsahu odpovidajicich pozic v zaznamech. Hledani Probiha rych- 
leji nezZ podle nesetfidéného obsatu, arotoze oouziva metodu pdleni intervalu (binarni hledani). 
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kontrola (prezkouseni) 


Rezin kontrola (verify: V) doyaluze ontrolovat (nFezkouget) data jejicn Opetovnym viladanim 
z Hlayesnice a Doraynanim S puvadne porizenymi caty zansanymi v transakcnim souboru. Voli se bud 
ee ene ome tena Ne Wyzve or Zandjem) vynoctu|tvolbal*kantrolat). Operator vidata udaye 
zprvotnito, dokladu a srogram poravnava kazdy viozeny znak s Odpovidajici pozici zaznamu, 
byl precten Z transakcniho souboru. Al 

Uitte ir pseu Val suatialt0ata podrobena stejnym formatovym a edicnim kontrolam 
OE ee ee eeit car cey tue. .Pokud oyla porizena  stejnym programen). Ke zpracovani 
eiapenie alias! icky pouzlt spravay format, ysou-il v programu zadény ogpovidayici prikazy pro 
ie maces revator'mizentace:zvolit foraat Klavesovym: funkcem) "dali format" nebo "vy- 
bér formatu’. - : 

ieee ce caren e/ukazatel Tene nastaveri Ma prvni pozica prvmiho vstupniho pole, 
am Beazer naka Prazdna. kazay viozeny znak se oak poravna s odpovidayicim 
maken precteného zaznamu (ulozeného v paméti), Jsou-li oba Znaky shodne, je vxladany znak prijat 
HEED alent 20k se pak zobrazi a usazate) se oosune na dalsi pozici. Jestiize 2naky ne- 
aalesiyantrezi se chybovs zprava a catove <lavesy se neuplatni, dokud Chyba neni zrugena (k)ave- 
sou ML), Téroven J@ zo2razeno celé vstupni pole, v nénz oyl nesounlas zjistén. Po zruseni chybove 
zprivy mize operator opét vlozit znak do chybové pozice. Tento Znak je pritat jako spravny, jest- 


lize: 


ktery 


- je shodny se znakem v zaznamu nebo 
- je shodny se znakem vkladanym naposledy. 


Jeli znak ofijat, je zobrazen v pozici nac ukazatelem. Ukazatel se gak posune Ma daisi pozici a 
véechny dosud neprezkouSené pozice jsou opét zobrazeny jako prazdné. 

PrezkouSeni oli, do nichz se vkladaji data automaticky xlicovym siovem INSERT nebo SUBST, pro- 
biha take automaticky. Obdsah pole v disxe:ovem zaznamu se porovna s hodnotou urCenou. programem, 
Jestlize oba ddaje sounlasi, je pole prijato Jako spravne a zobrazi se; ukazatel se pak posune na 
zatatek dalSiho pole. Nesouhlasi-ii Udaje, zobrazi se chybova zorava Zaroven s daty z disketového 
zaznamu. Operator musi zrusit crydovou Zpravu blavesou NUL a pax ma dvé moznosti: 


- ponechat vy poli data z disketoveho zaznamu, stiskne-]i klavesu POLE KROK, nebo 
~viozit do pole data z Programu, Stiskne-li xiavesu KOR (korekce pole). 


Wobou pripadecn se pak uxazatel nastavi na zatatek daiSino pole. 

Preziouseni poli duplikovanych prostrednictvim funkce “pomocnd duplikace" (klicave slovo 
AUDUP) nebo funkce “automaticra duplikace" (parametr AD Caveho slova CHECK) probiha automaticky. 
Ohsah pole v disketoven Zaznamu se poravna s daty, ktera se Maj duplikovat (z paméti - pomocna 
Guolixace, nebo z predchazejicino Zazfamu - automaticka duplixace). Jestlize data v zaznamu souhlasi 
S daty, ktera se mayi Gupiixovat, je pole priyato 28K0 spravne a je zobrazeno; ukazatel se pak posu- 
ne na Zatate’ dalStho pole. Nesouhlasi-li data, zobrazi se Cryoova zorava zaroven 5 daty z disketo- 
veho zéznamu, Uazatel J€ nastaver a prvni pozici, v niz Ayi Zjisten nesounlas. Operator musi zru- 
sit chyoovou zprévu klavesou NUL a oax stisxnout klavesu DUP, Tak se chyony znak nahradi znakem 
2 duolixované oblasti (z pamati nebo z predchazejicino zaznamu). Automaticke prezkousemi pak pokra- 
Cuje do konce pole, 

_ Prezkouseni poli preskakovanych automaticxy (narametr AS kligoveno slova CHECK) nebo rucne 
(klavesou SKOK) proniha automaticky, Je-li v poli zZjisten nemezeravy znak, zobrazi se chybova zpra- 
Waa data ve zbyvajicicn pozicich pole. Operator musi zrugit chybovou zpravu klavesou NUL a pak 
Stisknout klavesu SKOK, Tim se vymaze chybny nemezerovy znax a autonaticke pFezkouseni pokracuje 
0 tonce pole, 

Pri prezkouseni Poli, oro néz je zadéno zarovrani vpravo iS v ruprice "Typ dat" nebo. parametr 
Mn reat Ktovéo slova CHECK), mize operator pou7it steynycn klavesavycn Unozi Jako pra porizo- 

t uze prvni viozeny znak je ste)ny Jako prvni znak viozeny pri porizovani. Vypinkove znaky 
mae autonaticky. Jestlize véak ayi pi pfezkouseni viozen alespon ;ecen vypiikovy znak 

, nezera nebo nula), musi byt viozeny vsechny. 
thaklal saan obsahuyi y zonove Casti posledn nozice nexadecimalni €islici 0 {kod zaparneno 
atisticog tae: pee pale Cane <iicove slovo CHECi 3 paremetrem =E (povinné opusténi abs Zanove 
Heovou gist; -- -BiO pozice 3€ prezrusuji oddélené, Nejprve se v«laca Cisiice, ta se porovna s cis- 

88!) posledni d0ZIce, a oax stisy slavesy POLE- Zkontroluje, zda zonova cast posledni pozi- 
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Je hexacecimali Cislice D. Nesouhlasi-j1 ¢islice, zobrazi se cislice i znamenko z pivodniho za- 
znam. 4 Cny20va zorava, Operator musi zrusit cayoovou zpravu klavesou NUL a znovu vkiadat data. Ta- 
taz Cislice, vlozena sodruhé, nahradi cosavacni érslici. Znamenko se }1Z nezobrazuje, 1 kdyz -zonova 
Gast stale oxsanuse nevadecimalni Eislici J. 7ak musi operator prezouset zonovou Cast kiavesoy 
POLE-. 

Zonova a cisiicova Cast znaku mize byt prezrousera t 
se vkladaj}i po sod@ zona a Cislice v hexagecimainzm vy saarer 


Slavesovou funkci “sexadecimalni", kdy 
1. 


trarsakni souoor, kde prepise olvoani 


aLSeni zménén, je = 


Je-li zaznam pry 


zazjam. 


la 


lezix “tont korekce 


Rezin sonteola-korekce (verify-co-rec obsah pravé zpracova- 
vaneho distetovenc “3m! 5€Z Jorovnavani v s daty v disketovém zaznamu. Vyvolava se 
z rezimu <ontrola vesou Zenym hornim oenykem \funke2 ‘<orekce zaznamu"), Procesy vria~ 
dani dat v -ezimu +ontrola- arisaminaj1 pracesy v rezimu zmena. Po dokonceni zaznamu se vy- 
potet vrati do -ezime kontrola a Zeorigovany zaznam je < dispozici aro prezkouseni. 


Rezim kontrola-zobrazeni 


Rezin xcntrola-zobrazeni {verify Gisolay: V-Dj dovoluje operatorovi proniizet zaznam na obra- 
zovce. Vyvolava se z -ezim: kontrola «lévesovou funxci “zobrazeni kantrolovanéna zaznamu". V tomto 
rezimu nelze uplat 


t Zadné xuntroly. 


Rezim kontrola-vkiddani (verify-insert: V-}) dovoluje operatorovi vlozit nove zaznamy dovnit? 
transakéniho souboru mezi existujici zaznamy. Vyvoiava se z rezimu xontrala klavesovou funkci "vlo- 
Zeni zaznamu". Cinnost v tomto rezimu je steyna jako v rezimu znéna-vilddani, az na to, Ze se vyvo- 
lava z rezimu kontrola a vraci se do néj. 


Rezim kontrola-hleda 


ReZim kontrola-hiedani  (verify-search: V-S) dovoluye ozeratorovi vynledat a precist zvoleny 
zaznam transaxéniho souboru. Vyvolava se z rezimu kontrola jednou z técnto xlavesovych funkci: 


~ hledani podle cisla zaznamu, 
~ hledani podie absahu, 

~ hledani set? idénéno obsahu, 
~ hledani xonce dat. 


Bénem hiedan: je na stavovém f'dku zobrazen icentifikator rezimu V-S. Po aokonceni nebo zruseni 
vyhledavaci Cinnosti se vypocet vrati do rezinu xontrola. Zadani  jednotlivych typi vyhledavacich 
funkci je popsano v odst. "Rezim zmana-niedani a "Rezim kopirovani-hledani". 


Wypotetni_rezio (re 


m vypatet) 


Wootetni rezim (execute: X) ie vyvolan vady, provadéji-j1 se prixazy v rémci podprogramd (ve 
formula?i C). Jestlize Podprogram provadj rozsirené edicni funkce nebo explicitne zadané vstupni/ 
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jujstupni operace (v podprogramech vyvoianycn Z Program. p°o porizovani gar zanrnujiciho transaxc- 
nj soubor), 7@ zmena na ypoer Rees drama tt Va JER Po cotu provadéni podprogramu. Fo do- 
konceni podprogramu se vypocet zase vrati do puvacnirc rezimu ivstup, zména, jontroia rebel area 
et). Jestlize se v programu rejouziva transakcni souaor, 1@ vysocetni rezim nastaven trvaie, 

Pri zpracovan prikazu EXFMT je nastaven v2dy vypocetni rezim. data se zp cOvava)i a snromaz= 
duyi sodle afixaz pro popis Zaznamu. a 20pis poli uvecenyc) uw souboru Aa kiavesnici/obr vce, Po 
apracovani kazdeho zaznamu se vypocet vrati na neyblizsi dalsi orisaz za prisazem EXFMT, Pri zpra- 
eran ofikazu EXFMT pemoncu 2yt 2ouzity nextere funxce, +tere :sou » dispozicy Pr. normal nim pori- 
zovini dat (5 tvansaycnim souborem). eceysim je Programova funkce auiomazicxa dupiixace \pa- 
ranetr AD hLitoveho slova CHECE ), st@ra aisto cat ede ‘stery nena v paméia k dis- 
porici® sroduuje mezery. Dale ;30u neucinne niavesove fun<ce uzce souvisejici > pouzitim 
fransabenine soubore ‘viz obr. 9.1), ] 

Obousnérna pole (& y rudrice “uziti’ prixazu pro oopis poles ouceme v dalsica Odstaycica zanr- 
novat pod pojem vstupni pole, procOze se oo vstupnicn poli lisi jen pocatecnim zobrazenim svych dat 
(ve vypacet 71 rezimu; a protoze se 3r1 porizovani dat s transax¢nim souborem ad vstupnich, poli 
vibec ne]i5i. 


9.3.2 Klavesove fi 


funkéni_klavesy 

Nekteré <lavesové funkce monou ay vyvolany afimo furkenim Klavesam. Jiné mohou oyt vyvolany 
jen Klavesovou sevenci, tj. POS*LINYM Stiskem Kiavesy FUN. isahozto Preapony) a jedne ze 14 klaves 
horni Fady klavesnice. Nad Torn ,iavesovo. facou je umisiena sca1sra fapovicajici vyznam jednot- 
livych klaves horni rady afi jejich pouziti ve funkea: sexvanci. Spodni polovins popisky piati pro 
stisk bez deZeneho aFemyku, horni polovina pra stiss s Srzenym Jornim premyxem, 

U nékteryco Kavesovych funkci ?sou vyzZnamne dva stavy «lavesnice, steré }sOu indixovany na 
stavoven “adku obrazovky. Jsou to stavy “ocelavano opusten) pole’ a “ocekavan ystup", 


Stay Totekavano opusténi_pole 


Tento stav vznixa afi zpracovan: vst 3n1c1 9011 ovrazovky, v jeyichz popisu ye zadano klicove 
Slovo CHECK (FE) nebo Ciselny typ se znaménxem ikod S v runrice "Typ dat"), jestlize byl viozen po- 
sledni znak tohoto pole. Stav j@ indikovan tax, ze uxazatei olika v posiedni pozici pole a vy pozi- 
ith 15-16 stavoveho radku Je €isio 01 (pocet pozic zZ0yvajicich do konce pole). 


real stay vanikne po vlozeni posledniho znaku zaznamu, Jestlize neni zapnuta funkce “automa- 
cee . Stay Je indikovan ukazatelew biicajicim vy posiedni pozici zaznamu a Cisiem 00 v pozi- 
16 stavoveho radku (pocet pozic zOyvajicich do kance pole). 
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| Nazev funkce 


prenrerpeneersreammnn 


utomaticka duplikace/skox 
Automaticke oznateni 
Automaticxy vstup 
Blok zpet 

| Daléi format 
Duplikace 
Hexadecimal ni 
Hledani konce dat 

Hledani podle cisla zaznamu 
Hledani pocle obsahu 

| Hledani set#idéného oosahu 
Konec prace 
Korekce pole 
Korekce zaznamu 
List krok 
Novy Fadek 
Nulovani 

| Oznaceni pole 
Pole+ 

| Pole- 

| Pole trok 

| Pole zpét 
Potlaceni ediénich <ontrol 
Prohlizeni druhého souboru 
PFeskok 
Presun zéznamu 
Smazani obrazovky 
Smazani vstupu 
Text 
Tisk 
Ukazatel dol 
Ukazatel nahoru 
Upozornéni 

| Vlozeni zaznamu 
Vlozeni znaku 

| Vstup (blok krok) 
Vybér formatu 


Znak zpét 


Zobrazeni kontrojovaného zaznamu 


Trugeni zaznamu 

Truseni znaku 

2adost 0 systém 
—— 


[on nnn nnn nnnennnnmnn nena mane anne mena mem 


i Rezimy 
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i me eoue! 
H aoe 
a | | | I 
i I+] | | { || 
i+] ie (onal iia 
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i Re wel 
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HF ila 
“i HT {| 
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ffs oe a 
Il lie| [1 i 
EG 
tt Pee 
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V tabulce jsou uvedeny jednotlivé «lavesové funkce a rezimy vypociu. Znaménko + znamena, ze 
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ylivesova funkce mize byt pouzita v prislusnem rezimu, Vynecnané misto znamena, ze funkce 
jt pozita, : 1 

‘Maje-z tabulky sou v modi fi<avane podobe Zanrnuty i v Nasledujicich poOpisecn klavesovych 
funkeis Pro piatné rezimy vypoCtu jsou y arasausnycn Sioupcich zapsana pismena, J’miz je uveden 
aywvétluiicl text. Vysvétlujici text se vztanuje Spise « datovym Operacim nez k odpovedim na sys- 
# é napovedi « Behem zobrazeni systemovych napoveaj je mozno pouzit funxci Povolenych Pro vypo~ 
cetni rezit. 


nemize 


fulonaticks dip! ikace/siok 


ECO-S O-TP RDU Uri US ¥ V=o VD VI veg x 
> Ia Bi ed eee 
to ml {i | jc} | ] i fal 
wool Ws CS Gs ES 


A, Stisk Klavesy ADS zapina funkea automaticxe dupiixace, coz je oznaceno lnverzne zobrazenym 
pissenea D v pozici 28 stavového fadku. Je-11 funkce automatické duplikace Zapnuta, provadé)i se 
operacet 


Reziny: 


~ utonaticka duplikace (parametr AD kl i€oveho slova CHECK); v rezim X - vypocet produkuje mezery, 
- autonaticky preskok ‘parametr AS «licoveho slova CHECK) , 

> posocnd duplikace (xiitové siovo AukDu), 

= ponocné ukladani (xligové slova AUXST). 


Stisk Klavesy ADS v tomto stavu funkci automaticke duplikace vypne. 


8 Funkce automatické cuplixace mize ayt v rezimu tisk zaonuta 1 vypnuta; nema vsak Zadny vliv 
na Cinnost v rezimu tisk. 


c Stisk <Javesy ADS zaging Tunkci automatické cuplixace, coz J@ oznaceno inverzné zobrazenyin 
pistenen Dy pozici 28 stavovéno fadku. Je-]j funkce automaticke Gupli<ace zapnuta, Jsou automat ic- 
hy prezkougena pole oznacena Jaxo: 


~automaticky duplixovana iparamatr AD klicového siova CHECK), 
~ automat icky preskakovana (parametr AS .licoveno slova CHECK), 
~ posacne duplikovans (xlicove siovo AUXDUP). 


Aitowticky je Orovadena funkce Powocneno ukiacani ikiicove slovo AUXST). Stisk klavesy ADS v tomto 
stavw funkei automatické duplixace vypne. 


Mutonatické oznateni 
Mins EC C8 C1 PRD UU] US V oC V-9 =I V-S x 
0 a id i ee ee 
MT CTT 
wwndadnembenntebanatenetenadanudeJ 
A, ei 5 q : 
; Stisk *lavesy Automatické oznaceni Zapina Junkci automaticxeno oznaceni. Opétovny stisk teto 
“*¥@8y funkci automat ickéno oznaceni vypind. Je-1i funkce automatackého oznaceni zapnuta, pak edic- 


me i i y : 
matics Myst zosoni Zaps hexadecimalnino Cisla FF (X'FF'} ao prvni pozice tonoto pole a auto- 
ahaieni funtce pale xrox (pFecnod na za¢dtek daisiho pole). 
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Rezimy: € C C-S C-7 P R-B U U-I U-S V V-C V-0 V-i V-3 X 


MEE 


-- jwendadanndodane. 


A. Stisk klavesy ABK zapind func automatickeno vstupu, coz je oznaceno inverzne Zobrazenyn 
pismenem R v pozici 30 stavoveho “adku. Je-li funxce automaticxeho ystupu zapnuta, J po dokonceni 
posledniho vstupniho poie zaznamu automaticky zanajena funkce vstup (jaxo kdyoy operator stiskj 
klavesu YSTUP). Stisx klavesy ABK v tomto stavu funkci automatického vstupu vypne; v pozici 30 
stavoveho fadku je pak mezera. 


B,  Klavesa ABK se pouziva k preruseni tisku skupiny zaznamd. 


C. Stisk klavesy ABK zapina funkci automaticxeno vstupu, coz je oznaceno inverzné zobrazenjn 
pismenem R v 90zici 30 stavového Fadku. Je-li funxce automatickeho vstupu zapnuta, je po prezkougenj 
posledniho vstupniho pole zaznamu automaticky zanajena funkce vstup (jako kdyby operator stiskl 
klavesu VSTUP). Stisk xiavesy ABK v tomto stavu funkci automatickeno vstupu vypne; v pozici 30 sta- 
vového radku je pak mezera. 


Rezimy: £ C C-S C-T PR-D U L+I U-S ¥ V-C V-D V-I V-S x 


beer TT bree kel Tefen 


eendatenndadanndan. wobannbenndonndoJ 


Je-li ukazatel nastaven v jiné nez prvni pozici orvniho vstupniho pole zaznamu, funkce blok 
zpét vrati ukazatel do prvni pozice prvniho vstuoniho pole. Je-]1 ukazate] nastaven v prvni pozici 
prvniho vstuoniho sole, funkce blox zpat preane vyoocet do rezimu zména a zobrazi posiedni zaznan 
zapsany na transakéni souoor. 


B.  Je-]i ukazatei_nastaven v jiné nez prvni p0zici prvniho vstupnino pole zaznamu, funkce blok 
zpet vrati ukazatel do orvni pozice prvniho vstupnino pole. Je-li ukazate] nastaven v prvni pozici 
pryniho vstupniho pole, funkce blok zpét zodrazi predchazey ici platny zaznam kopirovaciho souboru. 


C. Funkce blok zpét mize ayt aouzita jen pri hledani podie obsahu. Je-]i zobrazena vyzva k zadani 
vyhledavacich parametrd, funkce blok zoét Zanajuje hledani smérem zpét (od soucasného zaznamu k za- 
Catku souboru). 


D._ Je-li ukazatel nastaven v jiné nez orvni pozici prvniho vstupniho pole zaznamu, funkce blok 
zpet vrati ukazatel do arvni pozice prvning vstupniho pole, Je-li ukazate) nastaven v pryni pozici 
Prvniho vstupniho pole, funkce piok zpét zobrazi predchazejici platny zaznam transak¢nino souboru. 


E. Jerli Ukazatel nastaven v jiné nez orvni pozici prvniho vstupniho pole zaznamu, funkce olok 
zpét vrati ukazatel do arvni pozice Prvniho vstupniho pole a vymaze ySechna dosua prezkousena data 
2 obrazovky; tato data musi byt znovu prezkouSena. Je-1i ukazatel nastaven v Prvni pozici prvnino 
vstupniho pole, funkce blok zpét da i dispozici pro prezkouseni predcnaze)ici platny zaznam trans~ 
akeniha souboru. 


Fee Jeli ukazatel nastaven v jiné nez arvni poziCi prvniho vstupnino pole zaznamu, funkce diok 
zpet vrati ukazate] do prvni pozice Prvmind vstupniho pole. Vypocet zistava v rezimu xkontrola-K0- 
rekce, Je-li ukazatel nastaven v prvni pozici prvniho vstupniho pole, funkce blox zpet prepne vy- 
poéet do reZimu kontrola a nastavi ukazatel na prvm pozici pryniho vstupnino pole predchaze)iciho 
Zaznamu. 


G.  Je-li ukazate] nastaven v }iné nez prvni pozici Prvniho vstupniho pole zaznamu, funkce biok 
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zpit vriti ukazatel do orvni pozice prvnino vstupnina pole. Vypotet zistava y Gosavadnim rezimu, 
jeri ukazatel_ nastaven v orvni pozici prvniho vstupnino pole, funxce ook zpet vrata vypocet do 
iniho rezimu (zména nebo kontrola) a nastavi ukazatel na prvni Pozici prvniho vstupmiho pole 


predchaze)iciho zaznamu. 


He Funkea blok zpéet nastavi uxazatel do prvni pozice prvnino vstupniho pole zaznamu, 


EC C-S C-T P R-D U U-] U-S V V-C V-D v-I V-s x 
ii ia) Sia fa 


Reziny: 


err 
alB 11 jBlaf |cja) ja 
| denwdadenadometotan. a aad 


A. Stisk klavesy FMT KROK pre-usi v libovolnem okamzixu rozpracovany obrazovkovy format a Zahaji 
zpracovani formatu zadaného v rubrice "DalSi format” prixazu pro popis pravé zpracovavaného (pre- 
rugeného) formatu. VSecona dosud snromazdénd data se zrusi a ukazatel se premisti na prvni pozici 
prvniho vstupnino pole noveho formatu. 


B, Stisk klavesy FMT KROK precusi v libovolném okamziku rozoracovany obrazovkovy format (jiny nez 
foradt 0) a zahaji zpracovani formitu zadaného v ruorice "Dalsi format" prikazu pro popis prave 
zpracovavaneho (pFeruseneho) forniatu. Znovu se precte tentyz zaznam a zobrazi se podie naveho for- 
natu. Uazatel se p*emisti na prvni Moz1C1 prynino vstupnino pole noveno formatu. 


C, Vordbéhu sfezkouSeni zaznamu prerusi stisk klavesy FMT KROK rozaracovany obrazovkovy format 
a zahaji zpracovani formatu zadaného v rudrice “Daléi format" prikazu pro popis pravé zpracovavané- 
ho (pferuseného) formatu. VSechna dosud ptezxougena data se na obrazovce vymazou a cely zaznam musi 
byt znovu prezkouSen codle nového formatu. 


Duplikace 


Retinys EC C-SC-T P R-DU U-T U-S V V-C V-D V-I V-S x 
iciete tT oT TSR SR OO tered jon pas 

1! faray jppa] Tat 

edadanndadanndocedadinndenndenod, 


A _ Funkce Guplikace se vyvolana stiskem klavesy DUP a aupiixuje (kopiruje) data ze zdraje do zby- 
vajicich pozic pravé zpracovavaného pole. Zdrojem duplikovanycn dat jsou bua Odpovidajici pozice 
predchaze} iciho zaznam: (neni-li zadano <]1cavé slovo AUXDUP) neoo Odpoviaajici pozice promenné za- 
dane Jako parametr \licoveho slova AUXDUP v prikazu pro popis pole. Gdpovidajici pozice se odpoci~ 
tavaji ve zdroji i v poli zieva. 

Jeli zadano klicové slovo SUBST, funkce duplixace meplati; stiskne-1i operator klavesu DUP, 
zobrazi se chybova zprava. 


A Funkce duolikace Je vyvolana stiskem xlavesy DUP a porovnava data ze zdroje se zbyvajicim: 
Seca rate zpracovavaného pole. Zd¢rojem dat jsou bud adpovidajici pozice predchdzejiciha zaz- 
iittoee a Eudino klicavé slovo AUXDUP) neo Odpavidajici pozice proménne zacane jako parametr 
1v poli aa AUXDUP v oFikazu aro popis sole, Gapovidajici pozice se odpocitavaji ve zdroji 
je Rene aisten resouhlas, zbytek 20ie se zobrazi a uxazatel zistane v chybove pozici. Jestlize 
nahrazen areas zpravy Znovu zahajena funkce Guplixace, cnytny znak kontrolovaného pole je 
Jeli ae mies znaken zdroje a automaticke afez<ouseni poKracuje. — 5 
whrazi se ch ano klicave slavo SUBST, funkce dupiixace nepiati; stisxne-ii operator kiavesu DUP, 
ybova zprava, 


Ub +1 
runkce duolikace J@ vyvolana stiskem xlavesy DUP a duplikuje (kopiruje) data ze zdroje do 
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zbyvajicich pozic pravé zpracavavaného pole. Tdrojem duplikavanych dat jsou odpovidajici pozice 
Droménné zadané jako parametr klicoveho slova AUXDUP v pFikazu'pro popis pole. Odpavidajici pazi- 
ce se odpocitavaii ve zdroji i v poli zleva. Neni-li y popisu pole zadano xli¢ove Slovo AUXDUP, 
ye klavesa DUP neucinna, 


Hexadecinal mi 
Rezimy: €C C-S C-T P R-DUU-I U-S ¥ V-C V-D V-1 V-S xX 
Se ERD 


i a AE I a 


LS ee ee 

A. Funkce “hexadecimalni” dovoiuje operatorovi vlozit do Jedne pozice da) slozeny ze dvou hexa- 
decimalnich Cislic. Po Zahajeni funkce "hexadecimaln) " vlozi operator ava znaky za sebou; sméji to 
byt yen Cislice 0 az 9 a pismena A az F, b 

V pozici nad ukazatelem se zonrazi jeden znak, odpovidajici vlozenému hexadecimalnimu Cisiy 
podle kddové tabulky oro zobrazeni znakovycn uaajd (DKOI). Jestlize vlozené hexadecimalni Cislo nenj 
zobrazitelné jednim znaxem, odjevi se nad uxazateien systemovy indikator. Hexadecimalni reprezentace 
vlozeného cisla idva viozené Zznaky) se zobrazi v pozicicn 18-19 stavoveho Fadku. 

Po zahajeni funkce "hexadecimalni" ie v pozici i? stavového fddku zobrazen znax x. 

Ke zruSeni funkce "hexadecimaini” mdze ayt kaykoliv aouzita klavesa NUL. Jestlize je klavesa 
NUL stisknuta je3té predtim, nex je vlozena platna dvajice znakd, je funkce “nexadecindlni" zrugena 
a nad ukazatelem se Zadny znak nezobrazi. 

Ke zruseni funkce "hexadecimalni" dojde automaticky pri opusténi pole. Po zrugeni funkce “hexa- 
decimalni" je v pozici 17 stavoveho radku zobrazena mezera. 


B. Funkce "nexadecimaini" Govoluje operatoravi prezxouget jibovolnou exadecimalni hodnotu v jedné 
pozici. Po zahajeni funxce “nexadecimalni" vlozi operator dva znaky za sebou; sméji to byt jen cis- 
lice 0 a2 9 a pismena A a? F. Dale plati totez co v pripadé A. 


Hledani_konce dat 


Rezimy: EC C-S C-T P R-D U Ui US V V-C V-D V-i v-5 x 
CLOT — 
c 
bebe! LE Toy 
A. Funkce hledani konce dat vyhleda a zobrazi posledni zaznam kopiravaciho souboru. Vyhledavani 


probiha v rezimu kopirovani-hledani (C-S), Jaxmile je posledni zaznam Nalezen a zobrazen, prepne se 
vypocet do rezimu kopirovani a zaznam je x dispozici pro pripadnou modifixaci a kopirovani. 


B. Funkce hledani konce dat vyhleda a zobrazi posleani Zaznam transakéniho souboru. Vyhledavani 
prabiha v rezimu zmena~hledani (U-S). Jakmile Je posleani zaznam nalezen a Zobrazen, prepne se vy- 
pocet do rezimu zména a zZaznam je k dispozici pro aktualizaci, 


C. Funkce hledani konce dat vyhleda posledni zaznam transakéniho souboru. Vyhledani probiha v re- 
zimu kontrola-hledani (V-S). Jaxmile je posledni zaznam nalezen, prepne se vypotet do rezimu kont- 
rola a zaznam je & dispozici Pro prezkouseni. 
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a zaznamu 


iedén! pode Zis] 


ECC-SC-TPR-DUU-I U-S Vv V-C V-D y-1 y-s x 


PCT TTT 


denedadonndancdadanndacalenndanaded 


Rezimy: 


A. fFunkce hledani podle Cisla zznamu zobrazi vyzvu a prepne vypotet do rezimu kopirovani-hledani 
(C-8). Wava sozaduje zadani poradového cisla zéznamu, 


B. fFunkce hleddni podle Cisia zaznamu zobrazi vyzvu a prepne vypotet do rezimu zména-hledani 
(US), Wzva oozaduje zadani poradového Cisla zaznamu. 


C. Funkce hledani podle Cisla zaznamu zoorazi vyzvu a prepne vypocet do rezimu kontrola-hledani 
(W-5), Wzva pozaduje zacani poradového cisia zaznamu. 


Retinys EC C-SC-T PRD Ul U-S V V-c V-p V-1 V-S X 


OIL TE TTT 


A. Funkee hledani podle obsahu zodrazZi vyzvu a prepne vypocet co rezimu «opirovani-niedani 
(0-5). Wyzva aozZaduje zadani vytledavacica parametr’. Viz téz Popis rezimu kopirovani-niedani 
vodst. 9.3.4, 


8. Funkce Aledani podle obsanu zobrazi vyzvu a prepne vypotet do rezimu zmena-hledani (U-S). Vy- 
wa pozaduje zadani vyhledavacich Parametrd. Viz téz opis reziau zména-hledani v odst. 9.3.1. 


C, Funkce hledéni podle obsahu zoorazi vyzvu a pfegne vyootet co rezimi xontrola-hledani (V-S), 
Weva pozaduie zadani vyhledavacich parametri. Viz téz opis rezim kontrola-niedani v odst. 9.3.1, 


PT-To** Teen poypemeynyanny. a 0 Fe 


Tenis ™ 
Me Pe tT 


Ae Funkce hledéni setFidéného obsahu zobrazi vyzvu a prepne vypoéet do rezimu kopirovani-hledani 
(C-S). Wjzva Pozaduje zacani vynledavacich parameird, 


5, Funkce hledani setFidénéno obsahu zo5razi vyZvu a prepne vypocet do rezimu zména-hledani (U-S), 
@ pozaduje zadéni vyhledavacich parametra. 


henee Mledani set?idéného obsahu zodrazi vyzvu a prepne vypocet do rezimu kontrola-hledani 
+ Wava pozaduje zadani vynledavacicn argumentd. 
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P IS V V-o V-D V-i V-5 x 
ree 5 Be or a ah ae | 
AIA AT Adar A IAL AT Atala] at ay A ial 

{epee ee Jd, ded 


A. Klavesova funkce lonec prace se vyvolavé klavesovou sekvenci FUNK, KONEC PRACE} funkce uzavre 
vsechny soubory a ukon¢i vypocet. Systém zobrazi vyzvu k zacani urcité volby (neni-li vyzva v pro- 
gramu ootlatera <licovym slavem E0J(#PASS)). Po zadani volby operator stiskne klavesu VSTUP a volba 
se provede. Zménu voleb Ize urcit klicovya siovem SFILE. 
Je-li pouzita kiavesové funkce konec prace, neuplatni se uxoncujici funkce kligového slova Es, 
Imény Cinnosti klavesové funxce konec orace ize docilit licovym siovem EQJCTL. 


ReZimy: EC C-S C-TPR-DU UT U-S V V-C V-D V-I V-5 X 
{Hehe iii tin af 5 TT 
Pays fee eh sel feet: Yapeelesiy avait] 
hidedenednnndadoondadenn ebanmbenndbenntenndad 


A. Funkce korekce oole dovoluje nahradit obsan vstupniho oole pri prezkouseni. Porovnavani nahra- 
zovanych dat se vkladanymi daty je potlaceno. 

Funkce mize 5yt zahdjena v iterékoliv pozici pole. Fole se na obrazovce vymaze a ukazatel se 
nastavi na orvni pozici tohoto foie. Data mohou byt vélacana jako v rezimu ystup. Po ukoncenen 
vkladani se pele na obrazevce vymaze, ukazatei se vrati do prvni pozice tonoto pole a poie mize byt 
ak pfezkouSena, 

Funkce xorekce sole mize ayt souzita tad Po zruseni cnydy automatickeho vkladani dat podle 
kliCovéha slova INSERT nebo SUBST. Funkce +orekce pole nabradi pivodni cata ze souboru daty dosa- 
zenymi programen. 


Rezimy: EC C-S C-T P R-DU U-I US V VC V-D V-I V-S xX 


Sia! WITT 


! 
Lido... deenbadanntenadetonn ded 


A. Funkce korekce zaznamu nastavi ukazatel na pryni vstupni PozZiC) soucasného zaznamu a prepne 
vypotet z rezimu kontrola do rezimu kontrola-korekce, 


List krok 


Rezimy: EC C-SC-TP R-D U U-I U-S V V-C V-D V-I V-S X 
if =i dé 9 inte pa ip foo iS 
WITT i 


wobmwnbidennbenndenntanntat 


A.  VSechna zbyvajici pole zaznamu se reskoci a zobrazi se dalsi zaznam kopirovaciho souboru. 


B. VSechna zbyvajici oole Zaznamu se preskoci, zéznam se na transakénim souboru nezméni. Zobra- 
Zi se dalSi zaznam transakéniho souboru, ktery 3e k dispozici pro aktualizaci. 
C.  Prezkougeni zhyvajicich soli zaznamu se ofeskoci, zaznam se na transak€nim souboru nezméni. Pro 
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servouseni ie oak k dispozici dalsi zaznam transakéniho souboru, 
prez! : 


Nowy fadek 


ps c-T = I-] U-S V V-C V-D V-I V-5 ¥ 
Reziny: €€0-S C-T P P-D U U-] U-S V V-C V-D V-I v-s x 


BOTT TT TT 


_ JL SESE 


4, Funice navy 7adex aati jen aro format 0, Tato funcce premisti uxazatel na Pryni pozici dal- 
iho radiu na obrazovce. 


Mulavani 


Reziny: € CC-SC-T P R-DU U-I U-S V V-C V-D V-I y-5 x 
he Sue Sh Uhl Cat ts 
jalal | Tlatata{ fcla} faq fal 
“say Tay a ae RE al a 


Funkce nulovani se vyvolava stis<em kiavesy NUL. 


A, Je-li na stavovém ‘édku zoorazena chybova zprava, funxce nulovani zrusi Chydovy stay, adstrani 
chybovou zpravu ze stavového 7adku a odemkne <lavesnici pro vkladani dat, 

Ryla-li stisknuta kidvesa FUNK (predpona funxtri «lavesové sekvence/, funkce nulovani zrusi 
jeyi dcinek. 

Stavy Klavesnice “vkjaddani" a “nexadecimaini' Ize funxci aulovani zrusit a obnovit tak pdvodni 
stay Wavesnice. Viz 162 ao2is funkci “viozeni znaku" a "hexadecimaini", 


B, Funkce nulovani zrusi chybovy stav, odstrani chybovou zoravu ze stavaveno fadku a uvolni funk- 
Cni tlavesy. 


C, Je-li na stavovém #Adiu zobrazena chyoova zaorava, fun<ce nulovani zrugi cnydovy stav, odstrani 
chybovou zprévu ze stavového fadku a odemine xlavesnici. 

ay cli stisknuta klavesa FUNK ip*edpona funkéni klavesove sekvence), funkce nulovani zrusi 
Je). Ucinek. 

Stav klavesnice “hexadecimalni"® 1ze funkci nulovani zruSit a obnovit tak pivodni stay klaves- 
mice, Viz tz popis funkce "hexadecimalni". 


nen! pote 
Retiny: EC C-Sc-T p R-D U U-I U-S V V-C V-D V-I V-5 x 


iar T Teh 


owed ind, 


Ay Funtce Oznateni aole mize byt douzita x uysinemu oznaceni pole jako chybneno. Do prvni pozice 
pole zleva se ulo3) pexadecimalni Cislo FF, kter@ se zobrazi Jako systémovy indixator. Zbyvajici 
ae soitealy zadané v oFikazu ara a001s oole se Aeuplatni. Po stisku klavesy POLE KROK se ukaza- 
* Wemisti do arvai oozice dalSiho vstuaniho pole. 
Funke Oznaceni oole mize yt Zanajena, at je ukazate] nastaven v xterekoliv pozici pole. 


RF : ae ; 
Unkce aznagenj Pole ulozi do prvni aazice vole zieva hexadecinaini ¢islo FF, jestlize je 


Vali hee pole. ° adecin 10 FF, jestl 
i es chyba (v¥poéet :e DOzastaven). Operator neijprve musi zrusit cnydové hldseni kiavesou 
Dab vyvolat funvei Sznaceni pole. Vypocet oak pokracuje zpracovanim dalsiho pole. 
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jm orezkouseni aati totez, co Y pripadé A. Pouziti funkce oznaceni pole v zaznamu ysak 
fe (v) zadany kligovym slovem VMARK v prikazu pro popis zaznamu. 


C, Pro rez gent p 
ntrolni zacky 


potlaci zapis ko 


ECoG CTP RDU UT ESV Vet V-D V-1 V-S X 
ian fap ini Su Tae ele fe ras ated aia 
ARI i | AL Ay al [el Ts 
Nw loa cecdadennbacadadmonbene Soadeonde: 


Rezimys 


A. VW sledek funkce polet zavisi na vlastnostech pole zadanych vy prikazu pro popis pole, 

V Eiselnych polich se znamenkem (S v cuorice "Typ dat" prikazu pro papis pole) funkce polet 
signalizuje dokonceni veladani dat. Vbechna data vpravo od ukazatele se vyiwazou a data vievo od 
ukazatele se posunou x sravemu okra} pole. Do uprazdnenych mist vlevo se dopini nuly. Dodatetna 
pozice obrazovky bezorostredné 7a polem s€ vymaze a vymazang pozice indixuje kladne Cislo. Pak se 
pravedou véechny ediéni funkce. Nejsou-li zjisteny gadné chyby, premisti se ukazatel na dalsi 


ystupni gole. ; 
V ostatnich typech aol 
vy rubrice “DalSi funkce" prikazt 


zarovnavanycn vpravo (kligavé slovo CHECK s parametrem RB nebo RZ 
ui pro 90piS pole) funkce pole+ Signaiizuje dokonceni vkladani dat, 


Data vlevo od ukazatele se zarovna}? K pravemu oxrajl pole. Do uprazdnerych mist vievo se pint 
vyplitkove znaky (mezery nebo nuly). Pak s€ provedau vSechny edicni funkces Nejsou-li zjisteny zadne 
chyby,, premisti se ukazate] na dali ystupni pole. ce : 

y polich, ktera nejsou zarovnavana vpravo tani Ciseina se znamen<eMm, ani ostatm. | zarovnavana 
yvoravo), funkce pole+ zapini zbytex pole od ukazatele do konce pole mezeram a zahaji »zeccan 
edicnich funkci. Nejsou-ii z} tény Zadne chydyy premisti se ukazatel na dalsi vstupni pole. 


ole zadanych v prikazu pro popis pole. 
klidové silovo CHECK s paranetren 


B. Wsledek funkce sole+ zavisi na yiastnostech pi 
ati funkce pole+ jen tehdy, kaya je 


V polich zarovnavanycn voravo (8 vy rubrice "Typ dat" nebo 


RB nebo RZ v rubrice spaléi funkce" oFikazu oro 9091S pole) 9 y 
je pole” nebo stoji-li uxazatel v prvni pozicl pole zaplneneho 


indikovan stav “otekavano opusténi v ci zaplneneto 
vyplnkavym znakem (mezera nebo nula). Jestlize je indikovan stav “otexavano opusteni pole a zonove 
i tislicové East posledni pozice byly prezkouseny, zpisobi funkce polet prechod na daisi pole, Jest- 
lize véak znova Cast posledni pozice nebyla prezkousena 2 obsahuje zaporné znamenko | (hexadecinalnt 
tislici D), zobrazi se chybova zprava. V ziselném poli se znamenkem se zobrazi zaporne znanenio 
minus. V ostatnich typech poli zarovnavanych vpravo sé na poslednim mist zobrazi graficky anak 
pro zaporné cislo. Je-li funkce pole+ po zruseni chyby opakovana, zona se zméni a pro prezkousen! Jé 
\ dispozici daléi pole. 

U poli, kterd nejsou zarov 
vpravo), funkce polet prezkousi zbytek pole, 
se ukazatel na dalsi pole. 


se znamenkem, ani ostatni zarovnavane 


navana vpravo (ani ciselna s ynav 
li zjigtény chyby, premistl 


zda obsatuje mezery. Nejsou- 


Poler 
Rezimy: €C C-SC-TP R-D U U+I U-S V V-C V-D V-1 V-S x 
ren on tes fe Dn Gn 
PCDI TTT 
A. Funkce pole- plati jen v polich téchto typa: 
- tiselnd pole se znaménkem (S v rubrice "Typ dat"), 
= pole obsahujici jen cislice (D v rubrice "Typ dat"), 


- pole absahujici jen ciselné znaky (Y v rubrice "Typ dat"), 
= pole s Ciselnym premykem (N v ruhrice "Typ dat"). 
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V polich téchto typi je fun: le~ ; 
pu} sce jole- totozna s funkci pole+, az na to, ze vytvar 
V Ciselném poli se znaméak ' 2rasinytated ewoioe ae 
e akem (S) je zaporne é ‘ 
Wostatnich tyaech ie J@ Zaporne znamenxo m: 
Vos poli (N, D s inus zobrazeno 
malni Cislice D, jestlize je Zadar . | fo zeny V posledni © catove’ poz cr evpeave ule 
eateil Posledni®znak’v malta ae zarovnani vpravo nebo je indik pozici vpravo ulozi hexadeci- 
se podle typu cat zobraci tat, jay eae a “ocekavano opusteni 
ato tabulka: 


ita ateneemenmnny 
licova|Znak pro typ|Znak 

oe t rot 

| cast | N D val vl 


frovonasenteemennnnnnefaennnnnnennn| 


6. ha 
: J i ae 
= K 2 | 
3 : 2 
3 
5 leat eal ci 
es) N z 
eta 0 2 | 
7 > : 
fon vo recto ta 
locates ij ‘hile 


V polich typu N, D, ¥ 
Sas ve ypu N, D, ¥ bez zarovnani en 
reece mace od ukazatele infala ada oie indi xac 
xadecimalni Eislo DO. Z do predposledni 


e stavu “otekavano opusténi pole" se 
Tota Cislo se zobrazi na obrazovce podle We vader al i 
: ta f ele ; “bia pozice se ulozi 

y 


B. Funkce pole- plati jen v polich tachto typd: 


- Eiselnd pole se znaménkem 

Pek ese zname (S v rubrice "Typ dat" 

i ie Cees jen Cislice (Dv rudrice Bee 

aeineny i jen Ciselné znaky (Y v rubrice "Ty; ‘a t") 
iselnym premykem (Nv rubrice "Typ dat") ot Pe 


V polich téchto t 
eee ypi je funkce pole- $5 

huje zaporné znané -pole- totozna s funkci polet, az ; < 
V polich eS raalt €islici Dv Zenave east eosin! game ie zda pole obsa- 

RB nebo RZ y rubri ch voravo (S$ v rubrice "Tyo d ae nM ice). 

ip emren rubrice "Daléi Re ey. Typ dat" nebo klicave 

apiakayan stav "ofekavano Serine eh pro popis pole) plati funked pte Ae 

pole vyjma po i ay e" nebo je-)i uka: : dy, jel 
Vv Mictiweccne pozici je eaten aie eee ee ee a pale a cele 

zda absahuje mezery. Tec usta toe prezkousi funkce pole- zoytek pole vyima resin 

ae je nastaven na chyonj zraky Jestize znak, zobrazi se chybova zprava a nejrestiuca ealy; 

le-, je nemezerovy » Jestlize je po zruSeni chybové n@ znaky; 
y Znak nahrazen je po zruseni chybové zpravy znovu zaha 

zda obsahuje hexadecimalni éisio TpEbo fone @ prezxouseni pokracuje. Fosledni pozice je strates 

, 


Reziny: 


iT yr R-D J) U-I U-S V V-C V-D V-I V-S xX 
ala H T R Pata) (aan, $4 Setaaaeh SSSA pose) ees pm 
a ON 


AL Funk 

: ce pole “rol znamend) 0 vel 
nich editnich funkes namend, Ze vkJadani dat do pol é xe zat 

sorue unkci podle kl i¢ovy Ls pole je uxonceno a ze zatina z a 7 : 
konti-li se edigni Pelican) slov. Data od ukazatele do konce pole sstdvayi tbeaat Sella 
ez cnyby, nastavi se ukazatel na zacatek dalSiho atURr ha salen : 


Jeli indixava 

ikovan stav "otekava Sie 
i Vv "ocekavano opusténi pole", funkce pole krok vyhovi pozadavku na opuste 
po éni 
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Je-li indixavan stav “otekavan vstup", zpisobi funkce pole krok chybu, jestlize nebyla Zapnuta 
funkce automatického vstupu. 


B.  Je-]i indikovan stav "ocekavano opusteni pole", funkce pole krok vynovi pozadavku Na opusteni 
pole. - < pnd 
Je-li indikovan stav "otekavan vstup", zpisobi funkce pole krok chybu. 


Po zruseni chyoy automaticxéno viladani dat (zjiStene pri zpracovanl klicovéha slova INSERT 
nebo SUBST) funkce pole ‘rok prijme data z plivodniho zaznamu jako spravna. 


Rezimy: EC C-SC-TP RDU U-I U-S Vv V-C V-D V-I V-S X 
fa TT mynyney 


A ee 


A. Je-li ukazatel nastaven v jiné nez prvni pozici pole, funkce pole zpét premisti ukazatel do 
prvni pozice téhoz ‘pole. Je-1i uxatatel nastaven v prvni  pozici pole, funkce pole zpet premisti 
ukazatel na orvni pozici ofecchoziho ystupniho pole, 

Je-1j indikovan stav “otexdvano Opusténi pole", funkce pole Zpét tento stav zrusi a vrati uka- 
zatel do prvni pozice pole. 

Jeli indikovan stav "ogekavan vstuo", funxce pole zpét tento stav zrugi a vrati ukazatel na 
Prvni oozici posledniho vstupniho pole zaznamu. 


B, Je-li ukazatel nastaven y }iné nez orvni gozici pole, funkce pole zpét premisti ukazatel do 
Prvni pozice téhoz sole. Pole Se 7a obrazovce vymaze a musi ayt znovu prezkougeno. Je-1i  ukazatel 
nastaven v orvni pozici pole, funkce pole zpét premisti ukazatel na Pryni pozici predchoziho vstup- 
niho pole. Toto predchozi pole se vymaze a musi byt znovu prezkouSeno. : 

Je-li_ indikovan stav "oéekdvano opusténi pole", funkce pole zpét tento stav zruSi a vrati 
ukazatel do prvni pozice pole. 


Je-li indikovan stav “ocekavan vstua", funkce pole zoét tento stav zrugi a vrati ukazatel na 
Prvni pozici nosledniho pole zdznamu. 


Reziny: EC C-S C-T p R-D U U-T U-S V v-C v-p WOES X 
MA llemet ear te 


eT eT a 


A. Funkce Hotlaceni ediénich kontrol mize byt pouzita Jako odpovéa na chybovou zpravu, chcene-li 
potlacit kontrolu tyou vkladanych dat a fastaveni klavesnice (kad v rubrice "Typ dat") nebo obejit 
funkci klitového slova \zapsanéno v rubrice "Dalsi funkce"), 

Jeli pFi vkladéni dat do cole zji5téna chyba, operator zrugi chybovou zprévu klavesou NUL 
4 pouzije funkci potlaceni ediénich kontrol. Pak mize do zbytku pole vkladat libavolné znaky. 

Je-li chyba zjisténa ax po vlozeni vSech dat do pole, jde o chybu pri kontrole rozsahi hodnot, 
samokontrole, kontrole padie tabulek apod. Pouzije1i Operator funkci potlaceni edicnich kontrol, 


zrusi tim chybové 4]aSeni a obejde funkei kligavého slova, kterym byla zjisténa chyba. Pak se hned 
Provede funkce dalSiho kli¢avého slova, 


BL Funkce pot lateni ediénich <ontrol potlaci funkci kligoveho slova, kterym byla zjisténa chyba. 
Rezim Prenotet se Oonovi a zpracovani pokratuje dalSi edi¢ni funkei Pro totez pole, Pred pouzitin 
funkce ootlageni editnich kontrol musi operator ZruSit chybovou zpravu kiavesou NUL. 


as Eunkce Potlaceni ediénich koniroi mize byt pouzita Jako odpovéd na chybovou zprayu, chcene-li 
potlacit kontroly typu vkladanych dat a fastaveni klavesnice (kéd v rubrice “Typ dat") nebo obejit 
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funkci k]i¢ového slova (zapsanéno v ruorice "Dalsi funkce’), 
Je-li ofi prezkouseni vel édaného Znaku Zjisténa cnyoa, operator ZruSi Chyoovou zpravu kiavesou 
MUL a pouziie funkci potJaceni eaiérich kontrol, Pax mize do zoytku pole vkladat libovoiné znaky, 
Je-li chyba zjisténa az po vlozeni véech dat do pole, jde o chydu ofi kontrole rozsahd hodno. , 
sanokontrole, kontrole podle tabulek apod. Fouzije-1i operator funkci potiateni edicnich kontrol, 
zrusi tim chybové laSeni a obejde funkci kiigového slova, kterym byia zjistena chyba. Pak se hned 
provede funkce dalSiho «licového slova. 


Rezimys EC O-SC-TPRDU U-I u-s y V-C V-D V-I V-5 x 
mi NEGRGE 


JSR RIEEEEE 


4. Funkce prohlizeni druhého souboru oFepind vypocet do rezimu ‘opiravani. Viz popis rezimu kopi- 
rovani v odst. 9.3.1. 


ECCSCTPRDUU-I US V Vc V-D V-I V-S Xx 
‘TR ic) fram) ea peace ie Troe Ga pa | 


ial | {1 fatai Pian ae a} 


it) 

es ae a Se 
A. Funkce pfeskok zaplni zhytek pole mezerami a pax Zaa}i Zpracovani ediénich funkci. Probéhne-li 
toto zpracovani bez Cny5, nastavi se ukazate] na zaéaiex dalsiho pole. Je-1) indikovan stav “oceka- 
vano opusténj pole", funkce preskox vyhovi aozadavku na opusteni pole. 


8. Funkce preskok oFezkousi zaytek pole kontrojou, zca Obsanuje samé mezery, Je-li zjigtén neme- 
zerovy znak, zobrazi se chyoova Zprava a zoytek pole. Je-li po zrugeni chyoy znovu zahajena funkce 


preskok, nemezerovy znak je nahrazen mezerqu a arezvougeni s xontrolou mezer pokracuje ve zbytku 
pole, 


Presun zéznamu 


Retinys EC O-S O-T PRD U UT US V V-C V-D V-I V-S X 
SD A ale fat aed le oat De 


Os ih is 5 pie pe | 
pee Te 


Funkce Presun zaznamu prepne vyaocet do -ezimu <opirovani-presun, Poté, co je zobrazeny zaz- 
"an prekopirovan aa transakéni soubor, vrati se vypocet zpet do rezimu kopirovani. 


A, 


5, Funkce oFesun zaznamu afepne vypotet do rezimu xapirovani-aresun a zahaji kopirovani skupiny 
28znani kKopirovaci ho souboru na transakéni soubor. Pred funke) presun zaznamu musela byt vyvolana 
funkce hledéni Podle obsa sebo riecani podle cisla zaznamy. Zadani vynledavacich parametrd vsak 
feitoncila funkce vstun, ale funkce ofesun zéznamu. Zaznamy se xoviruji od sou€asného zaznamu kapi- 
Tovatiho soubor véetné, az po zaznan zadany v napoved: pro hledani, ktery se naxonec zobrazi, ale 
Rtoniruje, Wootet se aay vrati do rezimu xopirovani., Funkce ofesun zaznamu neplati v rezimech 
‘ontrola-a)edgni @ zm@na-hiedani. 
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Smazani_obrazoviy 


Rezimy: EC C-S C-TP R-DU U-l US V V-C V-D V-I V-S X 


MT wer TTL 


Lidndnnnbewedabenatadanndenadadenn, a oe Oo 


A. Funkce smazani obrazovky vymaze z oorazovky vSechny dase zobrazené oro pravé Zpracovavany 
zaznam a nastavi ukazatel na prvni pozici formatu 0. 


i _vstupu 


Rezimy: EC C-SC-TP RDU iI u-S V V-C V-D V-I V-S X 
maqenayeye= il es a oni tees eee tect 

SSE 1Cl Tale tay AB i 

[ by ue re whecadadeonte eae 


A. Funkce smazani vstupu vymaze vSechna vstupni pole pravé zpracovavaného zaznamu. Ukazatel se 
vrati na arvni pozici arvniho vstupnino pole. Tato funkce mize byt zanajena v libovolném okamziku 
zpracovani zaznamu. 


B. Funkce smazéni vstupu vymaze vSechry odpovédi na vyzvu k zacani vynledavacicn parametri. 


€.  Funkce smazani vstuou vymaze acpovéd aa vyzvu. Ukazatel se fastavi na prvni pozici pole pro 
odpoved. 


D. Funkce smazani vstupu vymaze vSecnna zobrazena data a zméni rezim xontrola na rezim kontrola- 
~korekce. Ukazatel se nastavi na Prvni vstupni pozici zaznamu. 


Text 


Rezimy: ECC-SC-TPRDU U-I U-S V V-C V-D V-I ¥-5 x 
ao “apg 10 ieee Bo i Fea tan a | 
MOTI 


A. Funkce text mize byt vyvolana, je-li na stavovém fadku Zobrazeia chybova zprava definovana 
uzivatelem {xdd zpravy 98x), Tyto caysové zpravy jsou vytvareny na zakiadé «lidového slova ERROR 
zadaného v sek Fadku pFikazu oro popis pole. Funkce text zobrazi text, zadany jako druhy 


qaramet- kligového sJova ERROR, v sozicich 41 aZ 80 stavového Fadxu, Podpora funkce text musi 
byt zahrnuts 49 vonfigurace systému. 


Tist 


Rezimy: 


A. Funkce tisk mani rezim vyaotiu na rezim tisk. ifize byt vytisten jeden zéznam, pokud je v pri- 
kazu oro specifikaci lohy zadano Kiigove Slovo PRIFILE, 


B. Funkce tisk mize byt pouzita jen tendy, je-li v aFikazu pro Specifikaci Glony zadaino klicove 
slovo PRIFILE. Stisk <lavesy TISK znéni rezim vypoctu na rezim tisk a vyvola vyzvu k zadani para- 
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mete’ pro tisx (viz popis rezinu tisi y Odsi. 9,3 


ihe 


Ukazatel di 


Rezimy: EC C-SC-TP R-D iu u-l ing y V-C V-D V-I y-§ x 
19 Oe pe ote 
at a al 

A, Funkce ukazatel doid piaii jen pro format oO. 

dol. (Neposune vSak ukazatel z aoslednino 

nezménéna. Pohyb ukazatele je omezen 
bor, 


moe | 
se H 


lo ae Ie 


‘atu iunkee gosune ukazate] na obrazovce o Fader 
OO Fadku na Pevni.) Vadoravna pozice (sloupec) zdstava 
fa pacet pozic zadanycr jako célka zaznamu pro transakéni sou- 


Ukazatel_nahoru 


Rezinys ECC-SC-TP RD UU-T U-S V V-0 V-p y-z V-S X 
ined i Gale ooh pee panes ee 
CCI ee a 
=: wodede nmin dednendennin. 4 
4, Funkce ukazatel nahoru p 
dek nahoru. (Neposune véax u az 


tava nezménéna. Pohyb uxazat 
soubor. 


i jen pro format 0. Tato funkce posune ukazatel na obrazovce o Fa 
i atel z prvnino fadxu na posledni.) Vodorovna pozice (sioupec) zis- 
Bie le omezen na patet sozic Zadanycn jaxo déles zaznamu Pro transakeni 


B. Funkee tXazatel aahoru plati cen oro form Tato funkce posune ukazate] na oorazovce 9 radek 
nahoru, (Neposune vsak uxazatel z prvniho Fadku na AOSiedni.) Vocoravna pozice (sloupec) zistava 
rezenéna. VSechny datové pozice, <teré isou pF tom presxocery, se na obrazovce vymazou a musi uyt 


ane een: Porya ukazatele Je omezen na pocet pozic Zadanych jako délka zaznamu pra trans 
akeni soubor. 


u =e 
pazorneni 


Retinys ECCS CTP RD Y Uni U-S VVC V-D V-I V-5 x 


A 7 IOCEYIESECAE 1 
DONE GESSENESCENENISERS 
A 


ditu Finkce upazornéni Zahajuje Proceduru, xterd umozhuje Pripojit Program, pracujici v zadnin od- 

ea ene! 4 C2razovce, vyzadu7e-11 tento program zasah operatora. V tom pripacé je cela 

aka ‘a Ob azena timte arcgranen, Fo dokonéent sozZadované Operatorovy odpovédi prevezme obrazovcu 
avesnici zase pivodns Program a vypocet pokracuje. 


Riis EC 0-8 cot p pep UT US ¥ v=c ¥-D v-I V-s x 
il it i et tees ees pa 
LL me TTT 


eet ae ey ee Ca 


APNE Peres, ee y 
tnkce viozenj Zaznamu zobrazi vyzvu a prepne vypotet do rezimu zwéna-vkladani. Vyzva pozadu- 
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je, aby operator zada) pocet zaznam vkladanyca do transakéniho souboru. Viz popis rezimu zména- 
-vkladani v odst. 9.3.1. 


B. Funkce vlozeni zaznam: zoarazi vyzvu a prepne vypocet do rezimu kontrola-vkladani. Vyzva poza- 
duje, aby operator zadai pocet zaznami viladatycn do transaxcaina souboru. Viz popis rezimu kontro- 


la-vkladani v odst. 9.3.4. 


EC C-S C-T P R-D U U-I U-S V V-C V-D V-I V-S X 
"cae 1 ED aa 


T T a 6 
TEAL ET 


A. Funkce vlozeni znaku umoZfuje viodi: znak na pozici, na miz je prave nastaven ukazatel. Plat- 
nost funkce je indikcvdna znakem > v pozici i4 stavavého facku. Stiskem datove «lavesy se posune 
znak nad ukazatelem a vSechny znaky napravo od néj o yednu pozici vpravo a pax se do pozice nad 
ukazatelem ulozi znak z datové ildvesy. Fotom se ukazatel posune o jeanu pozici vpravo, takze zi- 
stane pod tim znaxem, pod nimz ayl na zacatku. Benem piatnosti funkce vlozeni znaku mize byt uxa- 
zate] posouvan pouzitim funkci znak krok a znax zpet. 

Pred opusténim pole je i7eva vypnout funkci viozeni znaxu klavesou Nui. 

Jestlize posledni pozice pule obsasuje nemezerovy znak, zplisobi pokus o vlozeni znaku chybu. 

V poli kontralovaném go znacich {C v rubrice “Tyo dat” prikaze pro popis pole) UCinkuje funkce 
vlozeni znaku v ramci pedpole. Poapole je souvisia skupina znaxovych ozic, pro néz je definovan 
stejny znak v parametru kligového siova ShiF?. 

Funkce vlozeni zsaku mize 2yi pouzita pro nexadecim4lni pole (H v rubrice "Typ dat” prikazu 
pro popis pole), ale je-li funkce zaaajena az 20 zapisu arvni aoioviny znaku (prvni hexadecimalni 
Cislice), je tato palovina ztracena a musi ay: zapsana znovu. 

Funkce viozeni znaku nemize oyt pouzita v povinne zapifovanych polich (CHECK(MF)). 


Rezimy: 


vybér_fornétu 
Rezimy: EC C-S C-T PR-DU u-I U-S V V-C V-D V-I V-S.X 


fs re so 


Funkce vybér formatu dovoluje operdtorovi vyorat obrazovxovy format zadanim identifikatoru 
definovaného v prikazech pro popis formatu na formuiara Z. 

: Stisk klavesy SEL v lioovoiném okamziku zpracovani zéznamu zaha;i funkci vybéru formatu, kte- 
ra je dokontena viozenim icentifi<atoru vstupnino formatu. (Jeanomistay identifixator je Cislice, 
dvoumistny identifikator je velké pismeno a Cislice,) Jakmiie je cely identifixator vlozen, zpraco- 
vani soutasného formdtu se prerusi, doposuc ziskane vysledky se zruSi (viz A, B, C) a zobrazi se 
nove vybrany format s ukazatelem v prvni aozici prvniho vstupniho pole. 


A. Po viozeni identi fixatoru se dosud shromazdénd data zruSi a nové vybrany format je k dispozici 
pro vkladani dat. 


B. Po vlozeni ident ifikatoru se dosud shromazdéna (axtualizovana) data zrusi, znovu se precte 
tentyz zaznam a zobrazi se v nove vybraném formatu. 


Cc. Po viozeni _identifikatoru se dosud prezkougend data z obrazoyxy vymazou a cely pivodni zaznam 
mize byt prezkouSen podle nové vyoraného formatu. 
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Zeih 
Rediny: ECC-SC-TPRDUU-T US V VC V-D y-1 v5 x 


Bae ivi 
HOB SIGOIEEDL 


A. Je-li zobrazena vyzva x zadani vyhledavacich Udaii 
A. Hi zobraz z Udajd, st ja N prerusi 4 
zim a vrati vypocet do odvodniho rezima (<opi-avé uy Bs hese ie pe baka a 


B, Klavesa ZMEN mize byt pouzita « preruseni 
B. Kl nd t po eni tisku si nami Seni_rez 
jestlize se nepodarilo otevrit tiskovy soubor, en re ae ORI zalianiberezin biel 


€. Je-li zobrazena vyzva x zadani poct a 

“sf Po eeren K poctu v<lacanycn zaznamd 
rezim a vrati vypocet do ntvodniho rezimu (zména €i xo eee 
~ nevyhradi se Zadné misto aro nove Zaznamy. 


klavesy ZMEN prerugi vkla 
am 1 kladaci 
Mtrola}. Transakcni soubor zistane nezménén - 


Tnak_krok 


ECCS C-T PRD UU-i US V vc yep V-I V-S x 


a gm a as Bases oe z “t poe pom (| 
Ai 5 j j 
DN 


atooe, 


A. Funkce znak krok va : 
Posouva ukazatei o jednu Zz: 5 oe 
ukazate) 2 = oS om pozic) dale. Data se pri tow é . 
=a eed aoe cals do daisiho, Drovece se funkce pole irok. Rg SRE ae Fr 
J+ V possedna pozici posieaniha vstupnino pole} zpisobi chybu, neni-li Dente 
’ 3 uta 


funkce automatického vst if i E 
Grea), stupu. Je-li funkce automatickeno vstupu Zapnuta, provede se funkce vstup 


Beclisciditoys oe as =e 
i indikovan stav "odekavano Opusten: dole", funkce znak krok sii 


rh i jako funkce opusténi 


3B, Funkce znak krok mize by zi 
. @ byt pouzita, je-1; “ocekava 
Lee t sar J@-ti_ indikovan siav “ocekavano opugténi et i 
‘i ee say “ocekavan vstup", funkce znak jem spect oy wes 
peered prava doleva (kligové s) CHECK (Ri) L : Z 
E é ovo 
pele aaa Hed ree oe eee) funkce znak krok vymaze 


C. Funkee znak 4 pos, 

Ukazatel posune Satine ne ukazatel o jecnupozici. ddle. Data se p*i tom neméni. Jestlize se 
na konci zdznana a d pole do dalsiho, provede se junkce pole krok. Pokus o funkci znak krok 
ine Bie ticver, cries ferice poslednino vstupnino pole) zpisovi chybu, neni-li zapnuta 

Me li » J@-li funke: t rf ypoc ri 
tale c nasledujici za focal ee automatickeho vstupu zapnuta, vrati se vypocet na prikaz 
li indixova Nat ot s Ae 

7 Ndikovan stay Oceravano opusténi aoie", 


ei funkce znax krok slouzi jako funkce Opusténi 


Rezinys ra 
Yi ECC-Sc-tp R-D U U-] U-5 V V-C V-D V-I V-S x 


EET 


twwndanndadnwnbecndinndennde. 


Ay Funkee 
vy sce Znak zpe 3 
bit pousita pet posune ukazatel o Jednu pozici zpét. Data se pri tom neméni, Funkce mize 


Posuvu 1 4 
niho pole, Bie Pe aiele Z prvi pozice vstupnino pole do posledni pozice predchoziho vstup- 
*a2naM zosob; ice a ep AS pasuvu zpe: do predchoziho zaznamu. V prvni vstupni pozici 
208: opetovne provedeni vSech automaticxych junked pro pole, ktera pred- 
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chazeji pred prvnim vstupnim palem, e au 

Je-li indixovan stav “oéekavano opusténi pole", funkce znak zpet tento stav zrusi. Ukazatel 
zistane nastaven v posledni pozici vstupniho pole a znak v této pozici adie byt prepsan, 

Je-li indixovan stav "ofekavan vstup", funkce znax zpét tento stav zrugi, Ukazatel zistane 
nastaven na posledni vstupni pozici zaznamu. 


B. Funkce znak zpat posune ukazatel o jednu pozici zpéet. Datav Pozici na obrazovce se vyma~ 
Zou. Funkce mize byt pouzita k posuvu ukazateie z Prvni pozice vstupnino pole do posledni pozice 
predchoziho vstupniho pole, ale nemize oyt pouzita k posuvu ukazatele zpet do predchoziho zazna- 
mu. V pryni vstupni pozici zaznanu zatsodi funkce znax zpét apétovné prezkouSeni véech automat ic- 
kych funkei pro pole, kterd predchazeji prvnimu vstupnima poli, g Fe 

S vyjimkou poli Zpracovavanych zarava doleva funkce znak zpet zruSi stav “otekavano opusténi 
pole". Ukazatel zdstava v posledni pozici, xtera pak musi byt znovu prezkousena. ; 

S vyjimkou poli Zpracovavanych zprava doleva funkce znak zpét ruSi stay "otexavan vstup". Uka~ 
zatel zistava v posledni vstupni pozici zaznamu. 

V palich zpracovavanych zprava coleva (s klicovym slovem CHECK(FE)) je funkce znak zZpét neplat- 
nd kromé pFipadd, kdy je indikovan stay "ocekdvano Opusténi pole” nebo “ocekavan vstup". Pak se celé 
pole na obrazovce vymaze a musi byt znovu prezkousena, 


Rezimy: ECC-SC-TP RDU U-i U-S V V-C V-D V-i V-5 x 


A seg es ay 


A. Funkce zobrazeni kontrolovanéna zéznamu vypne vSecnny datové klavesy a prepne vypocet do re- 
Zimu kontrola-zobrazeni, Zoorazi se cely zaznam. 
B.  Funkce zobrazeni xantralovanéno zaznamu vrati vypocet do rezimu xontrola. Neprezkousena data 


se na obrazovce vymazou a uxazatel se nastavi na dalsi pozici, ktera ma byt prezkouSena. 


Rezimy: EC C-SC-TP RDU U-I U-S V VC V-D V-i v-s x 
METI CH TTT 


A. Funkce zrugeni zéznamu zrugi vgecnna data zobrazend v obrazovkovém formétu, zapige na trans- 
akéni soubor neolatny zdznam a nastavi ukazatel do prvni pozice Prvniho vstupniho pole dalsiho for- 
matu. Neplatny zaznam je zahrnut do poFadového Cislovani zaznaai, ale neadze byt éten. 


B. Fu 
precte 
Zaznam nemize byt Cten, 

soubor na daléi nebo precchazejici zéznam 


Nam 


nkce zruSen{ zaz 
dali zéznam z ¢ 


c. Funkce Zrugen{ zdznami nahradi soucasny zaznam Neplatnym zéznamem (v transakénim souboru). Pro 
prezkouSeni je nak k dispozici dalé{ zaznam transakéniho souboru, 
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Trugeni_znaku 


Reziny: EC C-SC-TPRDU UI U-S V V-c V-p V-I V-§ X 


ACCC a 


A. Funkce zruSeni znaku rui znax v pozica, na niz Stoji ukazatel. Znaxy v poli, které jsou vpra~ 
vo od ukaatele, se posunou o jednu pozici vievo. Do posledni pozice pole se ulozi sezera, Poloha 
ukazatele se nezméni. 

V poli kontrolovaném po znacicn (C v rubrice "Typ dat" prikazu pro Popis pole) Ucinkuje funkce 
zrugeni znaku v ramci podpole. Podpole je souvisla skupina znakovych Pozic, pro néz je definovan 
stejny znak v parametru kligového slova SHIFT. 

Funkce zrugeni znaku nemize byt pouzita v Polich kontroiovanych na mezery (CHECK(BC)) a v po- 
vinné zaplfovanych polich (CHECK(ME)). 


Tadost_o systém 
Rezimy: EC C-SC-T P R-D U U-I U-S V vV-C v-D V=I V-S X 


DORUISCIOENES RIE 
ee Se ee OC Ce ie! 


A. Funkce Zédost o systém dovoluje operatorovi dogasné prerusit  vypocet  soucasného programu, 
aby zaved] program do jiného oddilu. Po dokonéeni zavadéci operace se vypocet soucasného programy 
obnovi, jestlize novy Program neby! zaveden do oddilu, v némz by] vypotet prerugen. 
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9.4 Wypoce 


Ridici jazyk procedur (PCL - Procedure Control Language) unoziuje vytvaret tzv. procedury. Pro- 
cedura je jedna nebo nékolix Uloh (program) zpracovavanych bez zdsahu operdtora, nebo jen s mininen 
zasahi. Jazyk PCL je realizovan tfemi systémovymi programy: 


~- SYSBLD - zahajovaci program, ktery ofipravi oddi] pro vytvafeni procedury, 

~ SYSPREP - predzpracujici program, ktery prekladd 7idici prikazy napsané uzivatelem do tvaru zpra- 
covatelného programem SYSCTLR, 

~ SYSCTLR - Fidici orogram, ktery zprostfedkovava veskery vstup a v¥stup pro soubory vykonnych pro- 
cedur. 


Ridici jazyk procedur dovoluje naprogramovat predem odpovédi na napovédi nebo chybové zpravy, 
které se mohou objevit na obrazovce. Odpovédi~ mohou byt faprogramavany bud vSechny, od zavedeni 
az do ukonéeni programu, nebo jen nékteré. Programator mize omezit pocet ndpovédi vyZadujicich vstup 
z klavesnice na ty napovédi, xteré obsahuji oroménlivé parametry nebo velky objem dat, podle typu 
Ulohy. 

"prekl dae DE/RPG i prelozeny program mize byt zaveden a provozovan pod fizenim Procedury. K za~ 
lozeni procedury 1ze pouzit program SYSBLD. Vystup z programu SYSBLD (zékladni proceduru ve zdrojo- 
vém tvaru) 1ze modifixovat aodle ootieby, zejména k ogeteni chybovych stavd a k pozménéni pivodniho 
postupu. Potom lze programem SYSPREP vytvorit proceduru schopnou zavedeni a vypoctu. Program SYSCTLR 
provadi prikazy procedury a zpracovava automaticky ndpovédi zvolené v procedure. Ostatni napovédi 
ponechava rucnimu vstupu. 

Pri pouziti pfekladace DE/RPG mohou byt Fidicim orogramem automaticky zpracovany tyto ndpovédi: 


mente nnn ne nanan ne nnnnennenny 


0 Napovéd 
‘04 | DE/RPG - probiha preklad. 


Pracovni soubor ¢. 1. 
Pracovni soubor ¢. 2. 
Vystupni soubor. 


Zpisob tisku protokolu. 
2h Soubor pro protokol. 
— mew eenaneneennnnaneennnnan: 
CtyFmistnd hodnota paranetru IDNT kazdého prikazu RESP by se méla shodovat se étyfmi Cislicesi 


Cisla ndpovédi. Napriklad data pro napovéd 12-21 se doplni z prikazu RESP s parametrem IDNT 0 hod- 
noté 1221, 


PFi orovozu prelozeného programy mohou byt procedurau zpracovany tyto napovedi: 


-06 | V programy jsou chyby. Pokracovat nebo koncit. 

12-07 | Abnormalni ukonceni v DE/RPG-madulu. 

12-08 | Konec prekladu. V programu nejsou chyby. 

12-09 | Konec prekladu. Pocet informacnich zprav: xxx. 

12-10 | Konec prekladu. Pocet chybovych a informatnich Zprav: xxx. | 

12-11 | Délka programu presahuje 64 K slabik. | 
| 12-12 | Zadino pFilis mnaho formatd. | 
| 12-13 | Naprava chyby na vystupnim souboru. 

12-21 | Zdrojovy soubor. 
| | | 

| 


[tisio | népovad 
ee 


06-81 | Vybér rezimu TFILE, 
06-82 | Otevrit soubor. 
| 06-83 | Alokovat/novy pokus. 
| 06-84 | Alokovat soubor. | 


06-89 Statistiky/nic. 
6-90 | Typ statistiky. 
a | 
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Hodnoty parametru IDNT v prikazech RESP se musi shodovat se ttyrmi 
podobné jako u prekladace DE/RPG. 

Procedurou mohou byt Zpracovany i obrazovkove formaty definovane 
vsak oyt orovadény prikazem EXFMT. Tyto formaty nemaji— identi fikacni 
paranetru IDNT zadava misto néj :méno zéznamu (z formulare A). 

DalSi idaje Ize nalézt v prirucce "Ridici jazyk procedur", 


Cislicemi Cisla napovedi , 


uzivatelen V programu. Musi 
Ccislo, proto se jako hodnota 


9,5 Stavovy_ Fadek 


Pri zpracovani prelozeného programu se na hornim Fadku objevuje informace-o sta 


~ stavovy radek. Podle oko)nasti se zobrazuji étyFi tvary stavavého Fadku: pouplots | 


1 2 3 4 
1234567870 1234567890 1234547890 1234567890 123 
[or onencwnnnnnnnnnnannenenecomenncccnennenesenensauce 
Normalni vynocet : [x-xxxx XXX XK XKKKKK XK XK XK X 
Klavesova chyba: Pxmr000- 2000 9X XX ODEN X X XX X“X xX 
Edi¢ni chyba DE/RPG: Ix XXKKK XX XK XXKXKK XX XK KEK X 
Chyba vstupu/vystupu: X_XXKKTAHAKA KK XKXXXKKK XXXKKAXXKXAKKKKK 
nant ameter serine 
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Béhem vypottu, nejsou-1i indikovany Zédné chyby, je stavovy Fadek usporaédan takto: 


a ar 
Ve ce Obsah 


women, weennennne. 


1 Cislo oddilu. tCislo oddilu, ktery se vztahuje k obrazovee, je vyjadFeno hexadecimal ni 
Cislici (0 az 9 aA az F). Oddi) €. 0 je pryni, oddil €. F je Sestnacty. - 
Re) Cislo pozice vklédaného znaku. Béhem vklédéni dat se zobrazuje cislo pozice, do niz mi 
| byt pravé viazen znak. Cita se relatitne k zacatku zaznamu. 
| 13 Prenyk klavesnice. Znak vyjadfujici nastaveni (pFemyk) klavesnice: 
{ A ~ abecedni premyk, 
N - Ciselny premyk, 
H - hexadecimalni premyk, 
X ~ jen abecedni znaky, 
Y ~ jen Ciselné znaky, 
D - jen éislice, 
1 W - rezervovano, 
| V - rezervovano. 
14 Mezera nebo >. Znaménko > je Zobrazeno, je-li zapnuta funkce vlozeni znaku. Jinak je | 
Vv pozici 14 mezera. 
| Pocet pozic Zbyvajicich do konce pole. Je-li tento potet vétsi nez 99, zobrazi se 34. 
| Mezera nebo x. Znak x je zobrazen, je-li zapnuta funkce “hexadecimdlni*. Jinak je 
Vv oozici 17 mezera. 
| Hexadecimalni zobrazeni. Hexadecimalni éislo vyjadfujici v kédu DKOI vkladany znak. | 
| Cislo zaznamu. Poradové Eislo Pravé zpracovavaného zaznamu éitané od zatatku souboru. | 
Zahrnuje i neplatné zaznary, 
| Stav funkce automatické duplikace. Je-li funkce automatické duplikace zapnuta, je | 
|v této pozici inverznd Zobrazeno pismena D. Jinak je v pozici mezera. 
| Stav funkce automatického vstupu. Je-li funkce automatického vstupu zapnuta, je v této 
pozici inverzné zobrazeno pismeno R. Jinak Je ¥ pozici mezera. 
| Identifikacni kod vstupniho formatu. Je zobrazen identifikaéni kad vstupniho formatu, 
ktery je pravé zpracovavan nebo je pripraven ke zpracovani. Viz téz popis rubriky 


"Format" prikazu pro vstupni format ve formula?i Z (odst. 4.2.3). 


Identifikator rezinu. Rezimy vypottu vyjadrené identi fikator. 

E vstup (entry), 

c kopiravani (copy), 

C-S — kopirovani-hledani (copy-search), 
| C-T  kopiravani-pFesun (copy-transfer), 

P tisk (print), 
| R-D  prepocet se zobrazenin (rerun-display), | 
U zména (update), 
U-I zména-vkladani (update-insert), 
| U-S —_zména-hledani (update-search) , | 
v kontrola (verify), 
V-C  kontrola-korekce (veri fy-correct), 
| V-D  kontrola-zobrazeni (veri fy-display), | 
| VI kontrola-vkladéni (verify-insert), | 
| vs kontrola-hledani (veri fy-search), 
Xx vypoéet (execute), z 
ezkouSeci znacka. V rezimu kontrola nebo zména je v této pozici zobrazeno pismeno V 

(pFezkougeci, verifikacni znacka), byl-li zéznam Prezkougen nebo obsahuje-li tuto 

prezkouSeci znacku, 


2 
x 
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9.5.2 Klavesove chyby 2 ediéni_chyby DE/RPG 


Klavesové chyby a chyby zjisténé edicnini funkcemi DE/RPG jsou na stavovém Fa k 
étyfcifernym chybovym kddem VY pozicich 8-11, PFj vyskytu chyby ane anes eae 
stisknuta klavesa NUL. Jde-1i ° chybu klavesovou (chybny hoz), jSOU Zbyvajicj pozice stavoveho 
Fadku stejné jako pri normal nin vypottu. Jde-li o Chybu edi¢ni, vymaze se Cislo pozice vkladaného 
znaku (pozice 3-6 stavového Fadku) a ostatni Udaje jsou stejné jako pri normalnim vypottu. 


9.5.3 Chyby_vstupu/vystupu 


Dojde-1i pri vypoetu k chybé vstupu/vystupu (na Jinych zarizenicn nex klavesnice/obrazovka) 
Je stavovy Fédek usporadan takto: 


seein 
Cislo oddilu (jako pFi normilnin vypoctu) 

Fyzicka adresa zarizeni - CtyFmistny kad | 
Pomléka 

Kod chybové zpravy 

Pomléka 

Logicky identifikator zarizeni (Jestlize existuje) 
Jeena program (z Prixazu pro speci fikaci Glohy) 
Jnéno datového souboru 


LAA eee nenen eee. 


9.6 Produkéni statistiky 


Behen Drovadéni programu pro porizovani dat se shromazduji produkéni Statistiky. Tyto statis- 
tiky i30u vedeny za kazdou Ulohu (program) a za celou Dracovni stanici (klavesnici a obrazov- 
hu), Statistiky Za Ulohu se stFadaii do rezervovanych stradacd jen po dobu trvani dlohy (programu). 
Ls) konci Ulohy se tyto statistiky prictou ke stradacim rezervovanym pro oracovni stanici a statis- 
tiky Ulohy se vymazou. 


bt Statistiky Ulohy 


i Statistiky dlohy se shromazduji pro Operace v rezimech vstup, zména a kontrola. Stradace 
Ulohy se aktualizuji pri dokonceni kazdého zaznamu a obsahuji tyto tdaje: 


Ket klavesovych dhozd ) 


~ potet zéznami 
a Uplynuly fas v minutach, 
~ pocet oznatenych Zaznami. 


Pri oFezkougeni Se vede zvlastni strada¢ pro pocet klavesovych Uhoz® v rezimu xontrola-korekce. 


mes attee Statistik stanice Obsahuji sounrn statistik ze stédaé® jednotlivych dloh od doby 
®Cnino zaveden{ systému. Daléi stfadace Obsaiuji pocet tiloh, pro néz byly stradany statistiky. 
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9.6.3 Pristup k produkcnim statistikam 


Produkcni statistiky mohou byt ziskany dvema zpisoby: mize je precist a vyhodnotit program, 
nebo mohou byt pri ukonceni dlohy zapsany na disketovy soubor. Oboji statistiky, pro dlohu i pro 
stanici, jsou pristupné jen ze stanice, pro niz se udrzuji. 


9.6.3.1 Lis 


ni statistik v programa 


Stradace statistik maji sva rezervovana, pevné prifazena jména, ktera mohou byt pouzita jako 
zdroj Ciselnych udajd (Ciselné oroménné) v kligovych slovech formulare A nebo v prikazech formulare 
C. Obsah téchto st*adacd vSak nemize byt témito prostredky modifikovan. Stradace jsou oznaceny jmeny 
#STATO1 az #STAT29. Jejich obsah je vyznacen v tabulce v odst. 9.6.3.3 spolu s délkami udaja. 


9.6.3.2 Ziskani statistik z disketoveho souooru 


Druhym zpdsoben, Jak ziskat Udaje ze stfadach produkénich statistik, je jejich zapis na diske- 
tovy soubor urceny kli€ovym slovem SFILE v prikazu pro specifikaci Glohy formulare Z (viz tez odsta- 
vec 4.1.5). PFi ukonéovani Glohy (programu) se zobrazi tato napoved: 


1 000! Doi 40 Nets 


| Program ukonéen. | 
| Moznosti jsou: 
1. Zapis produkenich statistix 
2. Exit 
Zvol moznost: Stiskni VSTUP 06-89 
el 


Qbr. 9.1 


Zvoli-li operator moznast 1, zobrazi se daléi ndpovéd: 


0 0001 D o1 40 1eE 
| Urci typ statistiky. | 
| Moznosti jsou: | 
1. Uloha 3. Oboji 
2. Stanice 
| Zvol moznost: Stiskni VSTUP 06-90 | 


(Cnenccnnnnsnnnnecennsnnawnnnenennnecnsessasenneinenaneccsseenessnsenenreenneeen non: 


Obr. 9.2 


Zvoli-li Operator jednu ze tri moznosti a existuje-li statisticky soubor (urceny klicovyn 
slovem SFILE), zapisi se statistiky na tento soubor. Jestlize statisticky soubor neexistuje, Je 
nejprve Gperstur vyzvan, aby soubor alokoval (tj. vyhradil mu misto na disketé). 

Statistiky jsou zapsany jako jeden nebo dva 128slabicné zaznamy. Byla-li zadana moznost 3 
(oboji statistiky), jsou zapsany dva zaznamy, Z nichz pryni obsahuje statistiky Ulohy a druhy sta~ 
tistiky stanice, 
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9.6.3.3 Tabulka produkénich statistik 


Nasledujici tabulka ukazuje tvar zaznamd obsahu icich pri 
duke 
peny pode typd danych rezimy, V nich2 probihaji as v Kanden a 
dace, VSimnéme si, Ze i stFadac klavesovych hozd y rezimu 
trech skupindch, prestoze mize byt naplnén jen v rezimu kontrola. 


[ nero | ive] 


|stfadace beer 


Typ | Pozice fy kaj 
a zaznamu|tida je] 
| 


er es en ne 


Statistika 


Se oe ee cd 
Vstup 1-6 6 j Klavesovée uhozy #STATOL | #STATI? 
| 7-12 | 6 | Zaznamy | #STAT02 | astarig | 
| 13-18 | 6 | Oznacené zaznany | #STATOs | sstaTi9 | 
19-22 4] Uplynuly cas } *STATO4 #STAT20 | 
23-26 | 4 | Klavesovée thozy v rezimu | | | 
| ? | | kontrola-korekce | { ] 
Inéna | 27-32 6 | Klavesové Uhozy { *STATOS | #sTaT21 | 
| 33-38 | 6 Zaznamy | *STATOS sSTAT20 
139-44 | 6 | Oznatens zaznamy | #87aT07 | *staT23 | 
45-48 | 4 | Uplynuly gas | *StATos | *sTaT24 | 
49-52 | 4 | Kiavesove hazy v rezime 
| kontrola-korekce | 
| Kontrola | 53-58 | 6 | Klavesovée thozy #STATO? | *STATZ5 
| cae | 6 | Zéznamy | ASTATIO | #STAT24 | 
| | & | Oznagené zaznamy HSTATI1 | ¥STATIz | 
| 71-74 4 | Uplynuly éas HSTATI2 | STATIS | 
| 75-78 4 | Klavesove lhozy v rezimi | *STATIZ | #sTaT29 | 
| a ' l Kontrola-karekce | | i H 
|e | 79-82 9 } Wlohy #STATI4 | 
ae 2 La | { a aa | Ae 
# 
ee | tty ee aed 


Obr. 9.3 


ane ASTATIA az #STATI6 plati Jen pro statistiky stamic. 
Statistice klavesovych tihozé jsou zahrnuty tyto klavesy: 


~ datové k1a 
=, SKOK vesy, které nezpisobily chyou Pri kontrole znaku nebo Nesouhlas pri prezkouseni, 


~ POLE+, POLE 


> thazy ve funkci “hexadecing1n;" 
TIP/BLOK i KK, xadecimalni", 
~ BLOK ZPET, 
~ POLE KROK) POLE zPérT, 


4 er Oe 

© Statistice Klavesovycn hoz nejsou zahrnuty tyto klavesy: 
> Ni, 
* preayky,, Uzanceni prenyku, 


: * tatove kla 
leapt \teré zpsobi ly Chybu pri kontrole znaku nebo nesouhlas pri prezkougeni, 
ys Mahoru), | (ukazatel doi), 
z premyku (korekce pole), 


 thozy y > 
ezZimech a korekce a korekce zéznamu (pryni prébéh po stisku klévesy KOR), 


Operatni viastnosti 


statistiky, Udaje jsou sesku- 
rezimu SOU vyhrazeny stejné st7a~ 
kontrola-korekce J€ vyhrazen ve vgech 


9-33 


- vlozeni znaku, zruseni znaku, = 
- funkéni klavesové sekvence (vyyma funkce "hexadecimalni"), 


Strddat opravnych dhozd v rezimu kontrola je pouzit k pociténi zmén provedenych v pivodnin 
zaznamu pri jeho prezkouseni. y a ? : —ge vad 
Disketové zaznamy jsou dlouné 128 pozic, z nichz zacatek je vyuzit pro stradate a zbytex je 
rdzny podle toho, zda jde o statisiixy Ulohy nebo stanice. Pro statistiky Glohy obsahuji pozice 


79 az 128 tyto Udaje: 


79-118 Rezerva 

119-126  Jméno Wlohy 
127 Cislo oddilu 
128 J (job - dloha) 


Pro statistiky stanice obsahuji pozice 91 az 128 tyto ddaje: 


FA-118 Rezerva 

119-126 Jméno Glohy 

127 Cislo oddiiu 

128 § (station - stanice) 
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[Toten 


<r) 
| 10. Tvary dat 
is vet] 


ieee 


Na disketoveém souboru mohou byt ciselng pole vyjadrena v téchto tvarech: 


> anakovy (alfanumericky) tvar, 
~ zonovy dekadicky tvar, 

~ zhustény dekadicky tvar, 

- binarni tvar, 


v toato tvaru je kadda Cislice pole ulozena y jedné slabice, 
licovou cast. Zonova Cast je leva polovina slabiky (bity 0 az 2), 
slabiky (bity 4 az 7), Schematicky lze pole y ZOnovém tvaru znazorn 


0123 4567 0123 4547 0103 4567 0123 4567 0123 4547 


LP Se one eee 
Zona Cis-| Zona Cis-|Zéna €is-[Zéna Cis-! 
lice| lice lice nel 


ae ae ee HD 


ave 1111 Kladné znaménko (hex. F) 
abika 1101 Zaporné znaménke (hex. D) 


Tonova ca : : sees 5 

Ufc saber cece svtity press dekadického Fédu), pFedstavuje znaménko. Zdnové Edsti os- 
Ree zZpravidla xadecimalni Cislici F. fislo 0g! 4 v zGnovem tvaru tak- 

to (vyjadFeno hexadecindlnini ilies slo -081971 vypada v zcnovém tvaru tak: 


RADY 
2 OS Oa 
a 
Zaporné znaménko 


bie Tubtény dekadicky tvar 
V tom: ; 342 < A + » . 
Zinové, ie tyaru. jsou y kaddé slabice pole (kromé posledni) ulozeny dvé dekadické cislice, jedna 
tet ae pa .Y Cislicove Casti. Posledni slabika obsahuje v Cislicové cdsti znaménko a v zonové 
ln Hern Cislici (nejnizSiho dekadického Faédu). Kladné znaménko je reprezentovano hexadeci- 


HSIEH zSporné cencoe keto adie 0 he 
‘. nit ane Zaporné znaménko hexadecimalni éislici D. Schematicky Ize pole ve zhuSténém tvaru 
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0123 4567 0123 4567 


r i; a Re 

|tis- Cis-} is-|Cis- Zr 

[lice lice} lice 1 
yaad [RLS 


Slabika 


Cislo -08191 vypada ve zhuSténém tvaru takto (vyjadreno hexadecimalnimi Cislicemi): 


am 


Zaporné znamenko 


Zhustény dekadicky tvar pole na disketé se v programi musi oznacit kcdem P v rubrice "Typ dat" 
prikazu pro popis pole. 

Potet slabik potrebny k uchovani Cisla ve zhuSténém tvaru se spocita podle vzorce: 

Potet slabik = (Potet cislic / 2) + 1, 


pricemz zbytek po déleni se zanedba. 
Pole obsahujici zhuSténa dekadickd Eisla mohou byt dlouha nejvySe 8 slabik, tj. mohou obsaho- 
vat nejvySe 15 dekadickych Cislic a znaménko. Korespondenci mezi pottem cislic a pottem slabik za~ 


chycuje tato tabulka: 


5 Sanam | 
Pocet {Pocet | 
tislic}slabik} 

=| 
|e l 
4 | 8 
B 7 
12 7 
1 | 6 
1o | 6 
915 
8] 5 
cn er 
6] 4 
Soe 
e}s 4 
Sle 
2 | 2 | 


- 
ii 


Pole obsahujici cisla definovand se sudym pottem Eislic jsou doplnéna Cislici 0 v zénové Casti 
prvni slabiky na lichy potet Cislic. 


10.3 Binarni_tvar 

V tomto tvaru je v kazdé slabice pole (kromé prvni) uloZeno osm binarnich ¢islic. V prvni sla~ 
bice je v prvnim bitu (bit 0) uloZeno znaménko a v ostatnich bitech (bity 1 az 7) je ulozeno seda 
binarnich Cislic. Kladnd Cisla maji v prvnim bitu binarni Eislici 0, zéporna ¢isla bindrni Eistici 
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ree se Ff ene 
kych slic Stane, Ze binarni pole na disketé of } 
a za bsahuje ve’ 


1, Zapornd Cisla jsou vyjadrena v doplikovém kédu 
biky. " 
Binarni tvar pole na disketé se v progr. i 
ee Programu musi 
Bindrni pole nemiZe obsahnout tislo vétzi nes 
{ t z ahnout | tSi nez odpovidd 9 dek 
(devet Gevitek). Je-li Odpovidajici dekadické Eislo dlouhé 1 tt 5 
Nr kara délku pole na disketé 2 Slabiky; je-1i dlouhé 5 oe z iH bis 4 ae 9909) _ pedpo- 
dat d Tku pole fa disketé 4 slabiky. V rubrice "Délka" pFikaz; i ae Lp rirgiaalid it 
dichjch eislic. ZU Pro popis pole se udava pocet deka~ 


Schematicky lze pole v binarnim tvaru znazornit takto: 


Kazdé binarni pole musi mit délku 2 nebo 4 sla- 


oznacit kddem B v rubrice "Typ dat" pFikazu 


ckym Eislicin, tj, 99eeq9e99 


Slabika 


1 
0123456 7/890 


| 
eagecedercce cc é] 


debebed ended 
Tnanénko: deat 

oles ice 0 nebo 1 
1-zéporné 


Cislo + 8191 vypadd v binarnim tvaru takto: 


aes 
ea oe 


alll] 


znawénko [512+ | | | 
=| 

| 128+ 

| 


[1] = 8191 


Cislo -8191 vypada v doplikovém kddu takto: 


DRC ORoOREN 
So oe Oe OO 


Téporng 
znanénko 


Toto eisto i “ ‘ 
s cette od nejblize wise 9e= Odpovidajici kladné Cislo (absolutni hodnota) v binarnim tvaru 
nh e beara ocniny dvou, zde od Sestnacté mocniny dvou ("2 na 16"), tj. od cisla 
2 nicky Tulami a uly fener Druhy zpisob spotivd v tom, Ze y kladném ciste nahradine 
Wes 5 ickami a k vysledku pFicteme jednitku (na poslednim misté); pasiedni 
Testlize + 4namenko pri tom povazujeme za dvejkovor i 3 . 


hs i ske i Etu dekadic~ 
Vstupu do nych v definici pole, nadbytecné dekadicke ¢islice nejvy$é 7 pe 
NapFiklad binarni pole 5 definovanou délkou 4, dlouhé 2 slabiky na 


Tvary dat 10-3 


é alné ko @ Ci : ", Toto Cislo ma dekadickou hodnotu 28472, 
bsahuje hexadecimalné kddované Cislo X'7000'. T cislo ickcu ? 
tay stents v are dekadickém tvaru. Cislice 2 v nejvyssia Fadu eset asco se cdstrani a 
do paméti se ulozi Cislo 9672. Kdyby délka pole byla 3, byl by vysledek 672. 


Fekladat ig ze vs ci j i avné kladné nebo zdporné znanén- 
Prekladac DE/RPG zajistuje, ze vsechna Ciselna pole mali) Spraves k pale ach 
ko. Standardni znaménka 2énovych a zhuSténych dekadickych poli jsou X'F' - kladné znaménko a X'D 
- zaporné znaménko. 
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eee 


fas. Podprogramy psané y jazyku BAL | i 


ieiaiaiateeet ee 


emo) | 


Funkce, které neposkytuje 


jazyk DE/RPG, Ize naprogramovat jako podprogram y j 
Klady takovych funkci jsou napi.: 


azyku BAL. PFi- 


- slozité vypocty, 

- slozité manipulace s daty, 

~ pristup k informacim o programovém oddilu, 

~ ziskani Cisla oddilu, v némz je program zaveden, 

~ ziskéni poradavého Cisla prave zpracovavaného disketového zaznamu, 
- 2i8téni reZimu zpracovéni transakéniho souboru. 

Informace o potfebnych datovych oblastech jsou obsazeny v pFiruéce "BAL - funkeni popis” 2 
y priruéce "DE/RPG - prirucka programatora”. 

Pozndmka: Nedoporutuje se provadat vstupni/vystupni operace a vyuzivat 
DE/RPG-programu. VnitFni struktury, které nejsou dokumentovany v prirutkdch, se 
néni zménit. 

K vyuziti podprogramd z jazyka BAL je tFeba pouzit prikazy CALL, PARM, popr. 
laFi C. Podrobnosti o tom jsou uvedeny v odst. 6.5.0 

Podprogramy vyvolavané prikazem CALL z DE/RPG-programu musi spliiovat urcité 
toho, Ze musi byt zapsiny v jazyku BAL (viz pfirutku "BAL - Popis jazyka"), 
daléi pozadavky: 


i struktury 
mo bez upozor- 


PLIST ve formu- 


pozadavky. Kromé 
musi dodrzet jesté 


~V prikazu START musi byt zadan Parametr OPTION=SUB. 
-V prikazu .START musi byt hodnotou parametru ORG adresa Zarovnana na hranici 256 slabik. 
~ Lindikdtord a registrd by mély byt pouzity jen tyto: 
indikdtory I1 az 199, 
bindrni registry BR1 az BRS, BR80 az BRIS, 
dekadické registry R10, R11, R25 az RBC. 
~ Pred navratem do volajiciho DE/RPG-pragramu by mély byt pvodni hodnoty pouzitych registra obnove- 
ny. Indikatory 11 a2 199 jsou totozné s indikatory 01 az 99 v DE/RPC a mohou byt pouzity i mimo 
Standardni styk, ktery je realizovan prikazem P, 
~Prelozeny podprogram musi zac¢inat tabulkou 
Popisovate jsou datové oblasti dlouhé 4 slal 


popisovacd programovych segment na relativni adrese &. 
biky. Musi byt uvedeny nejmén? dva, nejvySe vaak 16, 

Posledni z nich musi byt popisovat "E". Prvni musi byt popisovat "I"; jeho adresni ast uddvd za- 

Catek podprogramy a zéroven jeho vstupni bod. 

~ Tver popisovate je tento: 


yto segmenty musi za¢inat a kontit na hranici 4 slabik); 

C'N' ~ nepreadresovavany segment ; 

C'R' ~ preadresovavany DC-segment (délky téchto segmentd musi byt nasobky 2); obsa- | 
huje adresy programovych abjekta; ! 

CE’ ~ konec posledniho segmentu. H 


——— 


23 lTatétetni adresa segmentu po prekladu: aatems 
Tyto adresy segment musi ndsledovat v nesestupné posloupnosti. Je-li zadtecni ad- 
resa segmentu rovna adrese v predchozim popisovaci, nebude predchozi popisovac de- 


erat segment, ale prece bude kontrolovan a dokonce zapotten do maxima 16 popiso- 
vaci, 


Podprogramy psané v jazyku BAL {1-1 


Adresy budou prepocteny (preadresovany) jen tehdy, jsou-li vétsi nebo rovny zacétecni adrese prv- 


niho segmentu a mensi nebo rovny adrese posledniho segmentu. 


V segmentu instrukci budou preadresovany adresy v téchto instrukcich: 


aston mney ee ee 
Symbolické oznaéeni|Operacni| [eymbol ické cenateni| Operatni] 
instrukce kod | | instrukce 1 kéd | 
Sette ee oe nn Snel 
BINDEC Ab | IF Rn .. AN COTS o | 
BINHEX } 49 | | IF Rn .. SX COTO oe | 
BRa = pamé{t | BRb 9 «| { IF Rn .. Sx COTO OF | 
BRa<=>pame{ | BRb 45 | PIF Rn ...0) COTES} cones | 
BRn(4) -= % IFC. .1S 0-255 SKIP | 4E 
BRn(4) += 4 | IFC. NOT 0-255 SKIP] 4c | 
BRn{(4)] /= AB IF Ra .. Rb COTO 05 
BRn &= 9A IFDSI .. COTO 25 
BRn C IFI .. COTO 07 
BRn 9 IFIR .. GOTO 04 
BRn += 90 INXEQ 45 
BRn -= 92 LOAD 2€ 
BRn #= AA 00. 
BRn = Rn A? = BRb A2 
CALL op | | = Rn ae | 
CALLTB 0B | | pamét|BRn RL .. | Al | 
DECBIN AF pamé{|BRn RR .. Al 
DECR BRn GOTO o% | [| pama{|pRnst.. fat | 
ENABLE of | pamet|BRn SR... fat | 
GOTAB BRn | o8 | [posunuti,Ra = 0-255] 44. | 
GOTO 00 | RESCAL cf 
COTO BRn 08 RESHXT c.f 
HEXBIN a | co | 


IF n .. FMT GOTO 02 


IF BRn .. 0 GOTO 03 | 
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Podprogramy mohou prebirat z DE/RPG-programu parametry prostrednictvim seznamu Popisovacd pa- 
rametri, ktery je vytvoren z prikazd PARM. Adresa tohoto seznamu je ulozena v binarnin registru 
BRB1. Nejsou-li z DE/RPG-progr amu predavany Zddné parametry, je v BREI Cislo X'FFFF'. Kazdému pri- 
kazu PARM prislusi jeden popisovat tohoto tvaru: 


Typ 
pozice |parametru 


slabiky 


Oboji Bity 0 az 4: rezerva 


Bit 5: 1 = tabulka 

0 = pole nebo tabulkova polozka 
Bit 6: 1 = posledni parametr 

0 = jinak 
Bit 7: 1 = znakova data 


Pole VyS5i slabika adresy (leva) 
Tabulka | X'00' 


Pole NizSi slabika adresy (prava) 
Tabulka | Index polozky v systémové tabulce datovych tabulek 


xy Oboji Inakova data (bit 7 slabiky 0 = 1): 
délka-1 pole nebo tabulkové polozky 
Ciselnd data (bit 7 slabiky 0 = 0): 
| bity 0 az 3: potet desetinnych mist 


bity 4aZ 7: délka - 1 
a a 


Podprogramy psané v jazyku BAL 11-3 
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Tato stranka je prazdnd Uimysiné 


Veechny disketové datove soubory vytvorené nebo pouzivané 
jen logické zéznamy pevné délky, To znamend, Ze vSechny logické 
delku. Logicky zaznam na disketé nesmi byt delé{ ned e192 
zaznan" se Casto Fika jen "zaznan", pokud nemize dojit k 
sektor), 

Tphsab ulozeni logickych zéznam’ na disketé zavisi na paramo 
Kazu pro popis souboru formuldFe A (viz 16% Odst. 5.1.7). Logicke 
neblokované a nenavazujicz, nebo jako blokované a Navazujici, 


zaznamy v souboru musi mit stejnou 


znako Misto "logicky 
Zamené s pojmem "tyzicky zaznam" (¢ilj 


h kli€ového slova BLKING y pri- 
Zaznamy 2 byt ulozeny jako 


Neblokované_a_nenavazu 


1 logické zaznany zatinaji vady na zaédtky fyzického 
ru) a nepresahuji jeho konec, napr. takto: 


u (sekto- 


Fyzicky zaznam 


(sektor) 

arenes nenienennbennnennmeenneradan-, 
(xy) Far pe] ees 
Logicky 
zaznan 


Blokované a_navazujici logické zéznany jsou na disketé umistény souvisle bez ohledu na hranice 
fyzickych zaznand (sektord), Prvni logicky zaznam zating na zatatku fyzického zéznamu (sektoru). 
V ndsledujicim obrazku ukazuje priklad A logické Zaznamy, které jsou kratSi ned fyzicky zaznam, pr i- 
Klad B ukazuje logické zéznamy deli nes fyzicky zaznam, 


Priklad As 
Fyzicky zaznam 
@ blok 


a 
{S20 a 


Priklad Bs 


Whit? souboru Jsou (logické) zaznany uspoFddany Jednin z téchto zpiisobd: 


~ Sekvenéni Usporadani, Zaznamy ndsleduj{ za sebou tak, jak byly zapsany, bez ohledu na jejich ob- 
= Usporiase ene byt _uspoFddény (setFidény) tFidicim progranem. pire 
Poradani podle klige, Zaznany nasleduji za sebou tak, Ze jsou uspoFdddny podle obsahu uréitého 
datoveho Pole (kligového Pole), fap 
zs klitového indexu. K datoveému souboru v sekvenénim usporddani existuje dalsi sou- 
index, ktery, Obsahuje seznam klicd 5 ukazateli na jednotlivé datové zaznamy. 


Organizace disketovych soubord a zpdsoby pFistupu k nim 12-1 


Zaznamy v soubor jsou ulozeny v tom poradi, v jakem byly vkladany. Prvni vlozeny zaznan je 
prvnim zaznamem souboru, posledni vlozZeny zaznam je postedni zaznam souboru, Existuji vSak klavesove 
funkce, které dovoluji vkladat nové zaznamy dovnit?, pop : nezadouci zaznany | zrusit, je-li prise 
zpracovavan jako transakni. Vlozenim novych zaznami se zmé1 ni poradova Cisla nasledujicich | zrami, 
zruSenim zaznam) se vSak pofadova Cisla neméni. Soubor 1 byt dodatecné setridén tridicim progra- 
men, 


K datovému souboru mize byt vytvoren programem pomocny soubor obsahujici porad Wa 
isla (vybranych) zaznamd, serazena podle vhodného sciho kriterza. Tak vznikne jakys: index 
(ovSem bez klicd), jehoz prostfednictvim se zpracuj{ datové zaznamy ve zvcleném pofadi. Tento index 
se nazyva “adresni index" (podle rezimu “adresniho trideni" tfidiciho programu). Existence adres- 
niho indexu se vyznaci kligovym slovem INDEX v prikazu pro popis datoveho souboru. Jedinym paranet- 
rem tohoto klicového slova je pak jméno disketového souboru obsahujiciho adresni index. DE/RPC- 
“program poznd adresni index podle délky logického zaznamu, ktera je 4. Soubory s adresnim indexer 
jsou zpracovavany prikazy READ a READP automat icky. 


12.1.2 Usporada 


i podle klite 


Zaznamy se pri vytvareni souboru ukladaji podle velikosti klize, tj. obsahu kl igoveho pole, 
vzestupné. Kazdy dal5i zapisovany zaznam je vlozen na misto odpovidajici velikosti jeho klice. Je-li 
vlozen dovnit? souboru, vsechny zaznamy ulozené za nim se posunou shérem ke konci soubort. Soubor 
tohoto typu je urcen tim, Ze neobsahuje zépis kli¢ového slova INDEX se jménem indexového souboru 
vy pFikazu pro popis datového souboru, ale obsahuje zdpis K v rubrice "Typ jména" v prikazu pro popis 
jednoho (klicového) pole. Takovému souboru Fikdme nékdy kligovany soubor. 


am, ktery se prida za 
raveho souboru na path 
misto podle velikosti kli¢e. Soubor s klicovym indexem je urcen zépisem kliového slova INDEX ‘ad 
jménem indexového souboru v prikazu pro popis datovcho souboru a zapisem K v rubrice “Typ jména 
V prikazu pro popis jednoho (klicového) pole. 


nami 


k rychlosti_vkladani_novych zaz 


Vlozeni nového zéznamu do souboru uspofddaného podle klite nebo kligového indexu mize podstatné 
ovlivnit rychlost zpracovani. Aby se novy zaznam dostal na spravné misto v souboru, musi by Pee 
tanou Zi 


zaznamy, které zistanou za nim, smérem ke konci souboru, nebo indexové pclozky, které zt 
vkladanou novou polozkou, smérem ke konci indexu. Posunovani se déje zaznam po zaznamu 
polozce) tak dlouho, dokud neni zjigtén neplatny zdznam (polozka)}, nebo az do posled 
(polozky). Proto je mozné zvysit rychlost Zpracavani tim, Ze se do souboru (indexu! zarad 
ky opakované neplatné zaznamy. To !ze provest RapF. pomoci obsluzného programy SYSCOPY. 
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12,2 Iplsoby pristupu k zaznamim 
Behe provadéni DE/RPC-; 


Programu 1ze k zaznamim pristupovat témito zpisoby: 


~ sekvencné, 
- priso podle poradového cisla zéznamu, 
- prino podle klice. 


Aplikace téchto zpisobd zdvisi na pouziti souboru v programy a na usporddani 
boru. Soubor mize byt pouzit v programy jako transaktni soubor (TFILE), ko; 
nebo mize byt zpracovavan prikazy formulate C. Soubor, ktery neni tran: 
byt zpracovavan prikazy formulae C. 


p zaznami v sou- 
rovaci soubor (CFILE), 
1 ani kopirovac{, musi 


transakéniho a kopirovaciho souboru 


Pri vytvareni transak 


Cniho souboru v rezimu vstup se zdznamy Fadi z, 
diny, tedy sekvenéné, ‘ os 


y jak jsou vklé- 


V rezimech znéna a kontrola se zaznamy mohou zpracovavat y normalnim pofadi i 
,_¥ ezine tro _2azn 0 poradi (podle rostoucich 
jel) Cisel). K iesind potFebného zaznamu je véak mozné vyuzit klavesovych funkci “hledani 
le Cisla zéznamu", "“hledani pod} ", "hledani Fidéne yA ani : 
Maier cant ani podie obsahu", “hledani set idéného obsahu" a “hledani konce dat" 
Funkce “hledani podle éisla zéznamu" je nejrychlejsi z rime ri Fadove 
Hiweeac j jrychlejsi zplsob pr imého Pristupu (pode poFadoveho 
, funkce "hledani set? idéného obsahu" odpovidd prinému prt. 
mibo souboru neni kligové pole definovano; 
Funkce “hledéni podle obsahu" 
Jednoho nebo nékolika znak& €i znal 
stanoveném rozmezi pozic. 


, he “hledéni konce dat" je nahrada hledéni posledniho zaznamu podle poFadového Cisla, ne- 


d stupu podle klide, i kdy3 u trancakt- 
oj je urcenc teprve jake vyhledavaci Parametr, 
odpovida sekvenénimu pristupu. Unosfuje vyhl 


0 $e mu pr ledat zaznam podle 
kovych Fetézcd umisténych na pevnych pozicich zaznamu nebo ve 


__V rezinu prepocet je pristup k zéznamim sekventni. 
mm 2aznamem souboru, 

2 znamy Kopirovaciha Souboru se zpracovavaji sekvent 
Ba Klavesovych funkei jako u transakéniho souboru. Jakmi 
oo nebo spolu se sérii dalgich zaznami, pfekopirovan 


Zatind se prvnim zéznamem a konti posled- 


+ Nohou vSak byt i vyhledany pomoci stej- 
le je pozadovany zaznam nalezen, mize byt 
2 kopirovaciho souboru na transakini scu- 


22 Fstup omoes_pikaad fornuléte C 
Soubory, které ne at ax 

i ori }sou def 
tepiat forauléFe C. Zplsob pFictoon k cee 
) av prikazech pro 
ry Se sekventnim 


an ani jako kopirovaci, musi byt zpracovany po- 
Pasob pristupu k zaznamim zavisi na Zapisech v prikazu pro popis souboru 
Popis poli (K) a na existujicim usporddani zaznami v souboru, 


covanys usporaédanim (bez kligového pole a bez kligového indexu) mohou byt zpra~ 


~Sakventa ice: 
= ag pact READ, READP, UPDAT, DELET, WRITE), 
~ thiag pete adresniho indexu (prikazy READ, READP, UPDAT), 
Poradového ¢isla zaznamu (CHAIN, UPDAT, DELET, WRITE). 
Soubor, adané iz 
Y USporadané pode kKlice (bez klitového indexu) mohou byt zpracovany: 


wie pee READ, READE, WRITE, UPDAT, DELET), 


*1Ce (prikazy CHAIN, SETLL, UPDAT, DELET, WRITE). 


Organizace disketovych soubord a zpisoby pristupu k nim 12-3 


Soubcry usporadané podle kligového indexu mohou byt zZpracovany: 


~ sekvenéné podle vzestupnych hodnot kli€ového pole (prikazy READ, READP, UPDAT, DELET, WRITE), 
~ pFimo podle klite (pFikazy CHAIN, SETLL, UPDAT, DELET, WRITE). 


12-4 DE/RPG - Popis jazyka 


wacneenenmeneneneneny 
fiz. Pouziti tiskarny | 
\. 


een eme meee ed 


Tiskarna, ktera je k dispozici u zarizeni Consul 2715, mize byt pouzita bud pro neformatovy 
otisk zaznamd Fizeny klavesovou funkci "tisk", nebo pro formatovy tisk Fizeny programem, 


13.1 Neformétovy otisk klévesovou_funkci "tisk" 


Klévesova funkce "tisk" zahajuje otisk jednoho nebo nékolika zaznami transakéniho souboru 
v tom tvaru, v jakém jsou zapsdny na disketé. K tomu tigelu je nutné zapsat do prikazu pro specifi- 
faci dlohy kromé kligového slova TFILE jeté klitové slovo PRIFILE, Mimo to je treba uvést prikaz 
pro popis tiskového souboru s klicovym slovem DEVICE urCujicim zafizeni. 


M%.2 Formatovy tisk Fizeny programem 


Fornétovy tisk Fizeny programem se pouziva k vytvaFeni vhodné élenénych tiskovych sestav. K to- 
mi je teba v programu uvést prikaz Pro popis tiskového souboru, jeden nebo nékolik prikazd pro po- 
pis zaznamu a pro kazdy zdznam potFebny potet prikazi pro popis poli. Jeden pFikaz pro popis zaznamu 
odpovida jednomu typu tiskového Fadku (s pripadnymi skoky a posuvy pred tiskem Ci po ném). Prikazy 
pro popis poli Fidi Elenéni udajd v Fadku. 

Pro tisk kazdého Fadku je tfeba pravést prikaz WRITE z formulae C. 

Clenéni tisku ve svislém saéru nize byt Fizeno kligovymi slovy SKIPA, SKIPB, SPACEA, SPACEB 
V prikazech pro popis zéznamu. Tato klitova slova urtuji pohyb Papiru v tiskovém mechanism pred 
Viastnin tiskem Fadku a po ném. 
Rozméry tiskové stranky, popr. formulafe, Ize urcit klicovym slovem FORM v prikazu pro popis 
Souboru, 


Pouziti tiskarny 13-1 


13-2 


DE/RPG - 


Popis jazyka 


Tato stranka je prazdna mys] né 


(cr nnennnnnennnnenacnnacaceneanescannnmmmneny 


| Priloha 3. Prehled formata programu SYSSEP 


V této priloze jsou uvedeny obrazy odpovidajici formatim Programa SYSSEP pro porizeni a opravy 
zdrojového programu. Obrazy jsou razeny podle identifikacnich kadé jednotlivych abrazovkovych for- 
nati. DalSi informace o programu SYSSEP jsou uvedeny v kap. 2. 

Obrazy ukazuji nazvy rubrik platnych pro dany programovaci formula? a typ prikazu. Za nazvem 
rubriky, kam se normalné zapisuji idaje zdrojového prikazu, jsou v této priloze uvedena cisla sloup- 
ci (v hranatych zavorkach), ktera ruoriku vymezuji ve formulafi. Tato Cisla }sou uzitetna, kdyz je 
treba vkladat zdrojové prikazy z predem vyplnénych formulard ZyiAjact, 


(Cotrrrr mn nnnnennwnencn manne nennmnnnenannnnweesewenenaanneeeneneennenececenacennn, 


0 0001 N O1 40 000001 aE 


| HLAVNI_NABEL 2 | 
1.Hlavni nabidka 5.Popis souboru , 8.Poznamka | 
2.Specifikace dlohy 6.Popis zaznamu 9.Vypocty 
3.Vstupni format 7.Popis pole 0.Format 0 (obraz zaznamu) 

| 4.Prohlizeci format T.Popis tabulky S.Dolni premyk (SO) | 

| ee J 


Format 1 - Hlavni nabidka 


[[o-~-eoconencuncancenccaunancnnnanacsenncasacncnaenasncnnessenasanasanasamacmnny 


ieiomn A 08 40 000001 E | 


Volby: [55-80} | 
CFILE() DATE() EDITC() ENTRATR() EXITATR() JOBOPT() 
PRTFILE() SFILE() SHARE/SHARER{) STATUS() TFILE() 


Format 2 - Specifikace ulohy 


Po vyvol ani klavesové funkce "vstup" se zobrazi format C3. 
Po vyvolani klavesové funkce “dalSi format" se zobrazi také format C3. 


PFiloha 3. Prehied formatd programu SYSSEP P3-1 


9 0008 A 02 40 000001 3 E 


ZE__VSTUPNI FORMAT 

Format: [8-9] Jménoz [10-17] 
Test.pozice: (23-30} Znak: [35-37] 
Volby: (55-80) 


CLRL(pocet) EOJ(jméno zarizeni #PASS) SLNO(n) WRITE(NO| jméno) | 


Opakovani: [20] 
Dali format: [45-46] 


Format 3 - Vstupni format 


Po vyvolani klavesavé funkce "vstup" se zobrazi opét format 3. 
Po vyvolani klavesové funkce “daléi format" se zobrazi format 4, 


(Cn namecacenenenencannecenesncenaeneennasemnaameeasen seen! 


woee ee 
0 0055 A 26 40 000001 CJE 


Z_POKRACOVANT VOLER 


CFILE() DATE() EDITC() ENTRATR() EXITATR() JOBOPT() 
PRTFILE() SFILE() SHARE/SHARER() STATUS() TFILE() 


CLRL() EOS() 
SLNO() WRITE() 
ne eat ae renee cas an 


Format C3 - Pokratovani voleb 


Po vyvolani klavesové funkce 


"vstup" se zobrazi opét format c3. 
Po vyvolani klavesové funkce 


“dali format" se zobrazi format 3. 


[Tateeeee meee: 
0 0022 4 01 40 000001 tie 


| 
Testovana pozice: {23-30] 


Znak: [35-37] 
Dalsi format: [45-46] 


Ta SAN 3s "gute" saint oroemitth ip 


Format 4 - Prohlizeci format 


Po vyvolani klavesové funkce "ystu 


ani kla p" se zobrazi opét format 4, 
Po vyvolani klavesove funkce “dal& is 


i format" se zobrazi format 1. 


P3-2 DE/RPG - Popis jazyka 


hos 6 ee 
[0 oo19 A 08 40 000001 SE 


| 
| 
ALF POPIS SOUBOR an =. 
‘Jnéno souboru: [19-26] Délka: [30-34] Uziti: [38] 
Dalsi funkce: [45-80] 


LOGON() MARK() NUMENT() VMARK() 


BLKING() CHECK(DD) DEVICE() DSPATR() DSPSIZ() FORM() INDEX() LABEL() 
es 


eee ee 


Format 5 - Popis souboru 


Po vyoléni klévesové funkce “vstup" se zobrazi opét format 5. 
Po wyvolani kldvesové funkce “dalSi format" se zobrazi format 6. 


een] 


0 0045 A 3 40 000001 CSE | 


4 POKRACOVANI POPISU SOUBORU | 


BLKING() CHECK() DEVICE() DSPATR() DSPSIZ() FORM() INDEX() LABEL) 
LOGON) HARK() NUMENT() YMARK() 


eee eae ene eesaneeceee: 


Weeemanteereoeennn, 


Format C5 - Pokracovani popisu souboru 


fo vyvolani klavesové funkce “vstup" se zobrazi opét format C5. 
Po vyvolani klavesové funkce “dalgi format* se zobrazi format 5. 


AR POPIS ZAZNAMU | 
Jnéno zaznamu: (19-26) uziti: (38) 
DalSi funkce: (45-80) 
CHECK(DD) DSPATRi) RECID() SETOF(} SETON() SKIPA(nnn) SKIPB(nnn) 
SPACEA(n) SPACEB(n) 


Aw enan ene, 


eee e erence eennnncnscwannne=: 


Format 6 - Popis zaznamu 


se zobrazi format 7. : 
“dalSi format" se zobrazi také format 7. 


Po Wolani klavesové funkce "vstup" 
Yolani klavesové funkce 


Péiloha 3. Prehled formatd programu SYSSEP P3-3 


(wate t en eenene ee cece enne. peeeee nee ne nnnecnenenannnce seme enennasens. 


0 0045 A 36 40 000001 COE 


CHECK(DD) DSPATR() RECID() SETOF() SETON() SKIPA(nnn) SKIPB(nnn) 
SPACEA(n) SPACEB(n) 


| 


Format Cé - Pokracovani popisu zaznamu 


Po vyvolani klavesové funkce "vstup" se zobrazi format 7. i 
Po vyvalani klavesove funkce "dalSi format" se zobrazi také format 7. 


| 
| A__POPIS POLE (A KONSTANTY) 


Indikator: [9-10] Typ jména(K): [17] Jméno pole [19-26] 
a 


Délka: [30-34] 
Typ dat: [35] Des.mista: [37] Uziti: [38] 


| 

| dek: [39-41] Sloupec: [42-44] 
Dalsi funkce: [45-80] | 
ADD ARRATR AUXDUP AUXST COMP DSPATR EDTCDE ERROR EXSR INSERT LOOK PHT RANGE... | 


Format 7 - Popis pole (a kanstanty) 


Po vyvolani klavesové funkce "vstup" se zobrazi opét format 7. 
Po vyvolani klavesové funkce "dalSi format" se zobrazi format C7. 


| 0 0045 A 36 40 000001 CFE 


Sonne 


RESET SEQ SETOF SETON SHIFT SUB SUBST TADD TSUB XCHK | konstanta 


| 
| 
| 
| 
| 
| 
| 
) 


ADD ARRATR AUXDUP AUXST CHECK DSPATR EDTCDE ERROR EXSR INSERT LOOK PMT RANGE 
RANGET 


Format C7 - Pokracovani popisu pole (a konstanty) 


fo vywolani Klavesove funkce “vstun" se zobrazi opéi format 7. 
fo vywoldni klavesové funkce “dalsi funkce" se zobrazi také format 7. 


0 0008 4 73 40 000001 8 E 


eeeny 


Format 8 - Komentar 


*2 vyvoléni Klavesove funkce “vstup" se zobrazi opét format 8. 
Povyvolani klévesové funkce “dal3i format" se zobrazi format 1. 


Poznamka: Format C7 dovoluje zapisovat udaje jen do rubriky “DalSi funkce" na pokracovacim Fadku. 
Je-li treba zadat indikator pro podminéni funkce klicavého slova CHECK na sekundarnim Fadku, je nut- 
no pouzit format 7. Jakmile je vlozeno Cislo indikatoru do rubriky "Indikator", program SYSSEP auto- 
maticky posune ukazatel na rubriku "Dalsi funkce". — = Bo = 


001 A 81 40 00001 oo E 
FORMAT 0 


nena 


a 


Format 0 = Format 0 (prikompilovana data) 


Seen 


* Yolini Mlavesove 
‘nalini Klavesové funkce “vstup" nebo "dalsi format" se zobrazi opét format 0. 


P3-4 DE/RPG - Popis jazyka 


Priloha 3. Prehled formati programu SYSSEP P3-5 


= aie a 
0 0019 A 06 40 000001 TOE 


ALT POPIS TABULKY 


Jaén tabulky: [19-26] 
Délka: [30-34) 
Desetinna mista: [37] 


Format 10 - Popis tabulky 


Po vyvolani klavesové funkce "vstup" se zobrazi opét format TO. 
Po vyvolani klavesové funkce “dali format" se zobrazi format 1. 


roses anne 


0 0001 4 80 40 000001 SOE 
VSTUP_MALYCH PISMEN 


| 
a 


Format SO - Vstup malych pismen 


Po vyvolani klavesové funkce "vstup" se zobrazi opét format SO. 
Po vyvolani klavesavé funkce “dal$i format" se Zobrazi format 1. 


te 


4 01 40 000001 | 


Format R8 - Komentar x prohlizecimu formatu 


Po vyvolani klavesove funkee "ystup" se zobrazi opét format RB. 
Po vyvolani Wlavesové funkce “dalsi format" se zobrazi format 1. 


P3-6 DE/RPG -.Papis jazyka 


[ riton 5. chyoré sordey sfenaiae Io 
i 


loha 5. Chybové zpravy prekladate ree | 
neem ete 


Chybové zpravy preklédace DE/RPG jsou trojiho typu: 


- privy 0 té2kych chybach, 
- en o stfednich chybach, 
- informatni zpravy. 


Informaéni zpravy nezpisobi zastaveni pfekladu. Nejsou-1i 
wivatel urcit, zda preklad bude pokratovat, nebo zda skoné{. § 
pocet zjisténych chyb a informatnich zprav. _ 

Chyba v jednom zdrojovém pFikazu éasto zpisobi 215i chyby v jinjch pFikazech, Je-2; 

3 


Zddné t83ké chyby, mize 
prekladu sc zobraz{ 


jingch 
klad zjisténa chyba v prikazu pro popis pole, kterd pFimBje prekladat tonto prikaz zai 5 
norovat), pak je v prikazech, které Odkazuji na toto pole (napF. ve formulafi C), indikovana chyba, 
ie pole nebylo definavano. Opravou pfikazu pro popis pole se soutasné opravi i tyto druhotné (za- 
vlecené) chyby. sree 

V ndsledujicim seznamu jsou chybové zpravy uvedeny podle velikosti svych Ciselnych kédd, které 
se tisknou v protokolu o prekladu zaroveh s textem. UJ vétSiny chyb je v této priloze kromé hlavniho 
textu uvedeno jeSté podrobnéjsi vysvétleni chyby a oznageni jeji zavaznosti. 


PFiloha 5. Chybové zpravy preklédage DE/RPC 5-1 


0001 Program | huje prikazy formulafd Z a A 


Teds 
Tdrojovy program musi obsahovat alespon tyto prikazy formulare Z: 
~ pravé jeden prikaz pro speci fikaci lohy a 


~ alespon jeden pFikaz pro vstupni format. 
Dale musi obsahovat alespoi jeden pi ikaz formulare A. 


9002 _Nespravné ‘typy formulard (Z, A, C, tabulky) 


Tks 


Formulare musi byt uvedeny v pofadi: Z, A, Ca tabulky. Prikaz se neuplatni. 


i Z neobsahuje *, J nebo mezeru (sloupec_7) 


0003 __Typ_jnéna ve forsu 


Sloupec 7 formulare Z (typ jména) musi obsahovat: 

* V poznamkovem Fadku, 

J V prikazu pro specifikaci tilohy, 

mezeru v prikazu pro vstupni formit a prohlizeci format, v pokracovacim Fédku a v sekundarnim Féd- 
ku. 

Kazdy jiny zépis je neplatny. Zdrojovy Fadek je ignorovan. 

0004 _Sloupce 8 a 9 (Format) musi_byt prazdné 


Stfedni 


Sloupce 8 a 9 formulare Z musi byt prazdné v prikazu pro specifikaci Ulohy, v prikazu pro prohlize- 
ci format, v pokracovacim Fadku a v sekundarnim Fadku. Dosadi se mezery. 


0005 Sloupce 10 az 17 (Jméno) neabsahuji platné jméno 
Stedni 


Prvni znak jména musi byt A az Z, x, # nebo 8, Zbyvajici znaky mohou byt A az Z, 0 a2 9, %, # 
nebo @. Jméno je ignorovano. 


Stfedni 
V prikazu pro specifikaci Ulohy musi byt sloupce 20 az 54 prdzdné. Dosadi se mezery. 


0007__ Sloupec 21 (Rezim) musi obsahovat E nebo R 


Sloupec 21 musi Obsahovat E v prikazu pro vstupni format nebo R v prikazu pro prohlizeci format. 
Tdrojovy Fadek je ignorovan. 


PS-2 DE/RPG - Popis jazyka 


Je-li sloupec 8: pdze byt sloupec 9: 
mezera mezera 
AazZ 0az9 


1az9, mezera. 
lapisy y této rubrice plati jen tehdy, je-1i ve sloupci 7 (Rezim) zapsano E. Zapis je ignorovan, 


wo _Vrubrice Jnéno_je zapsano neplatné_ jméno 


Teiké 


Protoze ve sloupci 7 je zapis E, musi rubrika Jméno obsahovat Platné jménc. To musi 
ve sloupci 10 a nesmi mit vice nez 8 znakd. Prvni znak musi byt A az Z, x, # nebo 8 3 
znaky wohou byt A az Z, 0 a2 9, x, # nebo &. Zépis je ignorovan, 


010 _Sloupec 20 (Opakovani) je chybné_vyplnén 
Stredni 


Vrubrice "Opakovani" musi byt mezera, neni-li v rubrice "Rezim" (sloupec 7) Zapsdno E. Je-1i 
ve sloupci 7 zapsano E, jsou platné zapisy: mezera, N, 1 ad 9. Zapis je ignorovan, 


QollStoupec 22 (A) je chybné vyplnén 

Stfedni 

Sloupec 22 ausi obsahovat mezeru nebo A. Zapis je ignorovan, 
W0l2_V pokratovacim Fadku musi | byt sloupce 7 az 54 | prazdné 
Irojovy Fédek je ignorovan. 

QO13_V prikazu pro prohlizeci_ forma 


Stedni 


Desadi se mezery, 


MA Slouce 23 af 22 (Testovang puzice 2 déte) j 
Stredni 


i rubrita Busi obsahovat mezery nebo #P0Sn, kde n je jedno- az étyfmistné cislo, Tapis je igno- 


AE Slapee Ba 2 (Relace)_jsou chybné wpl 


Stredni 


ny 


I , 
M0 rubrika sai Obsahovat mezery nebo £0. Zapis je ignorovan. 


Priloha 5. Chybové zpravy prekladace DE/RPG PS-3 


Stfedni 


Ve sloupcich 35 a 37 musi byt zapsany apostrofy a mezi nimi (ve sloupci 34) jediny znak. Zbyvajici 
sloupce musi byt prazdné. Zapis je ignorovan. 


_fornat_a dale) _jsou_chybné_vyplnény 


0017 Sloupce 45 az 54 (Dal 
Stfedni 


Platné zdpisy jsou bud 0 az 9 ve sloupci 45 anebo AO az 7? ve sloupcich 45 a 46. Ve zbyvajicich 
Sloupcich musi byt mezery. Zapis je ignorovan. 


0018 _Zépis klidoyého slova nebo paranetru formulafe Z_ je chybny 


Sted’ 
Zapsané klitové slovo neni definovano nebo parametry jsou zadany chybné. Zkontrolujte pouziti apo- 
strofd, zajistéte, aby parametry byly uvnitr zavorek a Zajistéte, aby byly spravné pouzity levé 

a pravé zavorky. Klicové slovo nebo parametr se neuplatni. 


Kazdy zdrojovy program musi obsahovat alespoh jeden prikaz pro vstupni format nasledujici za pri- 
kazem pro specifikaci Ulohy. 


A musi_obsahovat_m 


ru_nebo # 


Sloupec Z musi obsahovat hvézdicku, jde-li o poznamkovy fadek. Jinak musi zistat prazdny. Zapis je 
ignorovan. 


V_pokratovacin 


Stfedni 


Idrojovy Fédek je ignorovan. 


StFedni 


Dosadi se mezery. 


Sloupec 17 musi obsahovat mezeru, R, F, T nebo K a sloupec 18 musi byt prazdny. Zipis je ignorovan. 


PS-4 DE/RPG - Popis jazyka 


19 az 28 (Jméno a dale) jsou chybné vyplne 
025 Sloupce 197 az 26 ‘Jmeno a date’ _jsou_chybne _vypineny 
Jnéno pusi 

= byt zarovnano vlevo ke sloupci 19, 

= obsahovat nejvyse & znakd pro soubor nebo zaznam, 

~ obsahovat nejvyse 6 znaki pro pole nebo tabulku, 


- ratinat maken A az 1, x, # nebo & a pokratovat znaky A az Z, 0 az 9, x, # nebo @ 
V prikazu pro popis pole jsou platné téz zdpisy #RTN, #70Tn, *STATnn a UDATE. Tépis je ignorovan, 


00%__Sloupec 29 ausi_byt_prazdny 
Stfedni 


Dosadi se mezera. 


(027 Sloupce 30 chybné_vyplnény 


Stfedni 


(aj vy této rubrice musi byt zarovnan vpravo a musi byt ciselny (nepfekracuiicy ae hy 
priziny. Zapis je ignorovan. af elny (neprekracujici 2192), nebo mize byt 


Stfedni 


Platné zdpisy jsou tyto: 
A- abecedni premyk, 

B- binarni data, 

C- znakova kontrola, 

D- jen cislice, 

H- hexadecimélni Cislice, 
N-Ciselny premyk, 

ies zhusténd dekadicka data, 
$- Cislo se znaménken, 

V- rezervovano, 

V- rezervovano, 

X~ jen abecedni znaky, 

Y= jen €iselné znaky, 
tezera, 


W029 Sloupce 36 az 37_(Desetinnd 
Stredni 


mista_a_pfed) jsou chybné_vyplnéna 


Talo rubrika musi byt prazdné ; 
yar e yt prazdné nebo musi obsahovat Ci: z i i by 
prizdny, Zépis fesiqnorovin. vat Cislici 0 az 9 ve sloupci 37 a soupec 36 musi byt 


0030 wee . 

“Slee 3B WEiti) musi obsahovat_nezeru, 1, 0, B nebo ¥ 
Stiedni cong 
Stein 


Ke 2apist je tento: 
0 ee pole, 
> Wstupni pole 
Hk Obousaérné pole, 
~_Pratovni pole, 
158 Rezera, 


PFiloha 5. Chybové zpravy prekladace DE/RPG PS-5 


Je chybné zapsano kligové slovo, konstanta nebo paranetr. Parametry musi byt uzavreny v Zavorkach, 
znakove konstanty v apostrofech. Nevejdou-li se Udaje na jeden Fadek, musi byt poslednim nemezero- 
vym znakem v Fadku pokracovaci znak (+ nebo -). Klicové slovo, parametr nebo konstanta se neuplat- 
ni. 

00. Jiny typ formulare vy pokratovacim rédku 

Tees 

K pokracovani ve specifikaci funkci je zadan pokratovaci Fadek. V Pokratovacim Fddku nesmi byt 
zapsan jiny typ formulate (ve sloupci 7) neZ v primarnim Fadku. Predchozi zdrojovy fadek je igno- 
rovan. 

9035 __By!_pfekrocen rozsah pracovni_papéti_preklédate 


Tento problém mize byt FeSen zménou pokracovacich Fédkd na sekundarni Fadky u kli€ovych slov nebo 
omezenim délky ndpovedi a konstant. 


0036 __Chybny sekundarni Fédek; Fadek je ignorovan 


StFedni 


Sekundarni Fadek byl zadan jako prvni nepoznamkovy Fadek programu nebo byl zadan za fadkem s chyb- 
nym typem jména ve sloupci 17. 


Stieni 
Dosadi se mezera. 


Q052___Sloupec_12 


bsahovat_wezeru nebo N 
St¥edni 

Dosadi se mezera. 
Q053__Sloupec_15_nusi_obsahovat_mezeru nebo N 


Stfedni 


Dosadi se mezera. 


PS-6 DE/RPG - Popis jazyka 


Stfedni 


“_ 


Tapsanj indikator musi byt 01 az 99. Jiné zapisy jsou neplatné. 


0062_Indikator 

0062_Indikator, 

Stfedni 

Tapsany indikator musi byt 01 az 99. Jiné zépisy jsou neplatné. Dosadi se mezery, 
i byt 01 az 99 

Stiedni 

Tapsany indikator musi byt 01 az 99. Jiné z4pisy jsou neplatné. Dosadi se mezery. 

0065_Operace zadana ve sloupcich 28 a2 32 je chybna 


Kod operace susi byt spravné zapsan: musi byt bud prazdny nebo zarovnan vlevo (od sloupce 28). Zapis 
je ignorovan. 


0068 Sloupce 18 az 27 (1. operand) jsou_chybné vypInény 


Sifedni 


Platné zapisy musi byt zarovndny vlevo (od sloupce 18) a musi byt: 

~ jnéno definovaného pole, 

~ makova konstanta (v apostrofech), a 

~ iselna konstanta (bez apostrofd); smi mit vedouci znaménko (+ nebo -) a desetinnou tecku, 

~ jréno vektoru (tabulky), 

> oznateni prvku vektoru (tabulkové polozky) nebo 

> nivesti (u prikazd TAG, BECSR, ENDSR a PLIST). 

Upis je ignorovan. Je-1i zapsano oznateni prvku vektoru a chyba je jen v indexu, ignoruje se jen 
index, 


Mi _Sloupee 33 a 42 (2. operand) jsou chybné vyplnény 
Sted 


Platné 2apisy musi byt Zarovnany vlevo (od sloupce 33) a musi byt: 

* Ino definovaného pole, 

z mnakova konstanta (v apostrofech), t 

~ Cselng konstanta (bez apostrofi); smi mit vedouci znaménko (+ nebo -) a desetinnou tecku, 
~ }eéno vektoru (tabulky), 

7 @nateni prvku vektoru (tabulkové polozky) nebo 

ee Souboru nebo zaznamu u prikazi vstupu/vystupu. 


ied 1 ignorovén. Je-li zapsino oznateni prvku vektoru a chyba je jen v indexu, ignoruje se jen 
Ke 
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Stfedni 


Zapis v této rubrice musi byt zarovndn vievo (od sloupce 43) a musi byt platnym jnénen, Tapis je 
ignorovin, Je-li zapsino oznaceni prvku vektoru a chyba je jen v indexu, je ignorovan jen index, 


O071__Sloupce 49 ak $1_(Délka)_jsou_chybné vyplnény 
Stedni 


Udaj v této rubrice musi byt Eiselny a zarovnany vpravo, Platné hodnoty jsou 1 a 256. Zapis je 
ignorovan, 


0072 __ Sloupec 52 (Desetinna ai 
Stfedni 


Mezera definuje znakové pole. Cislice 0 az 9 definuji Eiselné pole a zérovei uréuji potet desetin- 
nych mist. Nemi-li iselné pole zédnd deset inn’ mista, musi byt zapsina 0. Zépis je ignorovan, 


0073 __Sloupec 53_(Zaokrouhleni) musi obsahovat mezeru nebo H 


Mezera urCuje, Ze vysledek nema byt zaokrouhlen; H urtuje, Ze vysledek ma byt zaokrouhlen. Tapis 
je ignorovan. 


Zapsany indikator musi byt 01 a 99. Jind zapisy jsou neplatné. Zépis je ignorovan. 
0076 __Chybny indikator ve sloupcich 56 a 57; susi byt 01 az 99 
Stiedni 


Zapsany indikator musi byt 01 az 99. Jiné zapisy jsou neplatné. Zépis je ignorovan. 


0077 Chybny indikator_ve sloupcich 58 az 59; musi byt 01 az ka 


StFedni 


Zapsany indikator musi byt 01 a% 99. Jing zapisy jsou neplatné. Zépis je ignorovan. 


Jnéno Souboru v titulnim Fédku ##CTDATA pro definici dat v prikompilované datové tabulce je delsi 
nez 8 znaki nebo obsahuje chybné znaky. Tabulka je ignorovana. 


Prekédovaci tabulky a tabulka zménéné tridici sekvence se musi skladat z dvojic hexadecimalnich 
Cislic (napF. C1C2). Tabulka zménéné tFidici sekvence smi obsahovat slovo ASCII. Zdrojovy radek 
je ignorovan, 


PS-8 DE/RPG - Popis jazyka 


(ng? _K tabulce chybi data 


Stredni 


Za titulnia Fédkem ##CTDATA, ##FTRANS nebo ##ALTSEQ nenasleduji z4dna tabulkovd data, 


Jnéno souboru smi byt dlouhé 1 az 8 znaki. Prvni znak musi byt A az Z, 0 a3 9, X, tt nebo 8; zbyva- 
jici znaky sméji byt A az Z, 0 az 9, x, # nebo @. Zdrojovy Fadek je ignorovan, 


W0eh_Sloupce 1 a2 8 susi_o 


Titulni Fadek tabulky zménéné tFidici sekvence musi ve sloupcich 1 az 8 obsahovat kéd ##ALTSEQ, 
Urojovy Fadek je ignorovan. 


II_zadano vice nez jed 


Stredni 


Tabulka pro zaénu tficici sekvence musi obsahovat budto pouze hexadecimalni data, nebo jen jedno 
slovo ASCII. Zdrojavy Fadek je ignorovan. 


(086 Titulni Fadek prikompi lované tabulky je chybny 


Thaky za #* nejsou CTDATA, ALTSEQ, FTRANS ani SLFCHK, nebo je zadan vice nez jeden pFikaz #*ALTSEQ. 
Taulka je ignorovanas 


Wht Chyba y kligovém slové bo paranetru_samokontroly 
Teka 


Platnd Kitova Slova jsou MOD, DISP, WEIGHTS, OPT. Parametry musi byt uzavFeny mezi levou a pravou 
zavorkou, Kligové slovo Je ignorovano. 


Tees 


Titulni Fidek ##SLECHK musi mit tento tvar: 
Sloupec:  Obsah: 
9 Mezera 


Watt Gis) 
Dap © samokontroly 


19488 Poznank inné 

‘ y (nepovinne) 
nsadi se mezery, ss 
Wiese : 
tite pFi1i8 mobo chyb;_prekiad kon’ 


ti on 
Oblast prey) saaz As cane 
mekladate vyhrazeng Pro evidenci chyb je pln. Opravte zjidténé chyby a prelote program 


PFiloha 5. Chybové zpravy prekladate DE/RPG P5-9 


znovu. 


i_byt_popis souboru 


VSechny prikazy pred prvnim prikazem pro Popis souboru jsou ignorovany. 


O181 __Tento popis pole neobsahuje délku ani_jméno 


Kazdy prikaz pro popis pole musi obsahovat jmeno pole nebo délku nebo oboji. Neni-li zadano jméno, 
nemize na pole odkazovat jiny prikaz programs. Neni-li zadana délka, musi byt pole definovano jin- 
de v programu. Prikaz je ignorovan, 

0182 _Chybné zapsané_jnéno 

Stfedni 


Zapis zatind # , ale neni to #RTN, #STATnn ani #T0Tn. Tapis je ignorovan. 


Plati_jen_pro popis souboru; ignorovano 


PS-10 DE/RPG - Popis jazyka 


(ats_Kliové slovo FORM plati_jen pro popis souboru; ignoravino 
a 


Stredni 


Jen pro popis zéznanu;_ignoravéno 


Mil ligove slovo LOGON plati_jen pro zarizeni COMM; ignorovno 


Stiedni 


Stedni 


oe se hlasi tehdy, obsahuje-li kligové slovo DEVICE chybny kdd zarizeni. Kli¢ové slovo je 


A _ISPATR plati_jen v pFikazech pro popis 
Stredni 


Souboru, zaznamu a pole 
Nitové stova je ignorovano. 
2 Cex 


-Blali jen v ptikazech pro popis soubor, pale 


Kiitové stove je ignorovano. 


Nitovg = 
MU Slovo CORP plati jen pro odkaz-na pole nebo tabulku. 


PFiloha 5. Chybové zpravy prekladate DE/RPC P5-11 


Cove slovo XCHK neplati_v tomto_ prikazuj_ignorovano wr Klitové slovo AUXST neplati_v tomto_prikazu;_ignorovéno 


Stredni sith 
Klicové slovo XCHK plati jen pro odkaz na pole nebo tabulku. tite slovo AUNST plati jen pro odkaz na pole nebo tabulku. 
0218 _Kli€ové slovo RANGE neplati v tomto_prikazu;_ignorovéno : EDTCDE neplati v tomto prikazu; 
{litové Slovo EDTCDE plati jen pro odkaz na pole nebo tabulku, 
9 Kligové slovo INSERT neplati_v tonto pFikazuj_ ignoravano 
Stiedni Ney 
ae stn 
Kli€ove RANGET plati odk le nebo tabulku. 4 

itove slovo RANGET plati jen pro adkaz na po’ font {litové slovo INSERT plati jen pro odkaz na pole nebo tabulku. 
9220 _Klicové slovo LOOK neplati_v_ tonto prikazuj_ignoravana 


w (aih_Kiigove slovo RESET neplati v tomto pikazu; ignoravéno 


Stfedni aL 
Stredn 


Kligové slovo LOOK plati jen pro odkaz na pole nebo tabulku. ’ . 
A. Jen pl pa: {litove slovo RESET plati jen pro odkaz na pole nebo tabulku. 


es 7 
08 Fikazuj_ignorovano 


Stredni ar 
Stfedni Setnt 


Kligové slovo SEQ plati jen pro odkaz na pole nebo tabulku. liové slovo SUBST plati jen pro odkaz na pole nebo tabulk 
' pole nebo tabulku. 


iD. 


Stredni 


Klicové slovo SHIFT plati jen pro odkaz na pole nebo tabulku. {lieve slovo TADD plati jen odk. 1 bo 
pro ‘aZ Ma pole nebo tabulku. 


iati_v tomto prikazu; ignorovano 
Sc UB _neplati_v_tomto prikazu; ignorovano 


Stfedni 
Kli€ové slovo PHT plati jen pro odkaz na pole nebo tabulku. ligove 
Mligové slovo TSUB plati j 
Jen pro odkaz na pole nebo tabulku. 


‘ove slovo ADD neplati v tomto prikazuj ignorovdno (Oh KLitov 
nated j_ignorovano 


Stredni a 
peed 
‘igove i 
litove slovo ERROR plati Jen pro odkaz na pole nebo tabulku. 
= MS _Klieové Slovo EXSR neplati_v tomto prikazu; ignorovano 
Stredni “at Ramet 
redni 
Klicove Kor slog Be i 
Plati jen pro odkaz na pole nebo tabulku. 


Kli€ové slovo AUXDUP plati jen pro odkaz na pole nebo tabulku. 


PS-12 DE/RPG - Popis jazyka 
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plati _v tomtc pi 


Kiicove slovo ARRATR plati jen pro odkaz na tabulku. 


237 


itové slovo BL 


IG nemize byt zadano pro 


Kli€ové slovo BLKING plati jen pro soubory na disketé, tiskarné nebo komunikacni ince. Pro jiné nez 
disketove soubory plati jen parametr *DBL. 


Lkove soubory; _ignoro- 


vano 


Stredni 


246 


Stfedni 


0247 _K 


Stredni 


Kli€ove slovo LABEL zadavé jméno souboru (v névéSti HORI na disketé), je-li jiné nez jméno souboru 
zadané v rubrice "Jméno” v prikazu pro popis souboru na formulari A. 


PS-14 DE/RPG - Popis Jazyka 


sat 


wel _Kiicow 


sti 


(e82_Kligové slovo XCHK plati_jen pro zarizeni CRT} ignorovano 


Stedni 


i_Kiitové slovo $€0 plati_jen pro zatizeni ORT; ignoravéno 


Sifedni 


BE _Niitové slovo SHIFT plati_jen pro zaFizen{ ORT}. ignorovéng 
Stredni 
Stet 


Gi_Migové slovo PHT plati_jen_pro 


Stredni 


-ignorovano 


ue) Kligové slovo ADD plati 


Priloha 5. Chybové zpravy prekladace DE/RPG PS-15 


ve slovo DSPSIZ plati_jen pro zarizeni CRT; ignorovino 


KLi€ove slovo ERROR plati_jen pro zarizeni ORT;_ignorovéno 


Stfedni 


PS-16 DE/RPG - Popis jazyka 


si 


itové slovo SE 
iah_Niieé slovo SE 


Stfedni 


itove INDEX pl 
la7_igovéslovo INDEX pl 


Stfedni 


Sti 


(8 Kligové slovo FORM smi_byt_v prikazu uvedeno jen_jednou;_ignoravano 


A Kiitore slovo SKIPA smi bjt v pFikazu uvedeno jen jednou 


Stfedni 


Strednj 


(ki 


igové slovo SETOF plati jen pro zar 
mys Klitové_slovo SET pres 


en_pro_disketovy soubor; ignorovano 


azu uvedeno jen jednou;_ignoravano 


smi_byt 


uvedeno_jen_jednou;_ignorovano 
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a 


slovo DSPATR smi 


PS-18 DE/RPG - Popis jazyka 


(wl Kliové slovo LOGON smi byt _v prikazu uvedeno jen_jednou 


Siiedni 


(uie_Kiitove 


Siedni 


OQi_Kligove slovo BLKING Obsahuje neplatny parametr 


Platné parametry kligového slova BLKING jsou tyto: | 

1) WH (dvé oblasti pro vstup/vystup) , | 

2) ¥FATU (neblokované a nenavazujici seskupeni zdznand) nebo Ml 
#fH18(blokavané a navazujici seskupeni zaznamd - standardni), 

Jsourli zadny oba parametry, musi byt #DBL prvni. 


litové stovo BL! 


Wile Kiitové sl 


Flatny parasetr klicového slova NUME! 
Cislen, Ki{Gové slovo NUMENT je ignorovano. 


MN _Kligové si 


Platne parametry 
4) Dilka stranky 
) Konec strénky 

povinny dda}. 


M) es ~ Gislo indikétoru (01 az 99), 


js 
Jeli chytnd déika stranky, ignoruje se k1ié 


Mat Parametr ) 
Po tisky, Tento pai 


Slo SIPA je j 


~ celé Cislo udava 


ignorovano, 


*FMTU a #FMTS plati jen pro disketové soubory, 


KING je ignorovano. 


ovo NUMENT obsahuje neplatny para 


NT udava poget zdznamd v souboru a musi byt vyjadren celym 


ovo FORM obsahuje neplatny_paranetr 


(v uvedeném poFadi) klizového slova FORM jsou tyto: 
~celé Cislo udavajici potet moznych tiskovych Fadkd na strance. Povinny tidaj. 
jici posledni Fadek stranky, do n&jz se jesté mize tisknout, Ne~ 


ktery se zapne pri dosazeni konce stranky. Nepovinny 


‘Ové slovo FORM; jinak se ignoruje indikator. 


ahuje neplatny paranetr 


iového slova SKIPA je Cislo Fadku, na néjz se ma nastavit tiskovy mechani seus 
ranetr musi byt celé Eislo od 1 do délky zadané v kliovém slové FORM. Kligove 
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Platny parametr klicoveho slova SKIPB je cislo radku, na né)z se ma nastavit tiskovy mechanismus 
pred tiskem. Tento parametr musi byt celé cislo od 1 do delky zadané v klicovém slové FORM. Klicove 
slovo SKIPB je ignorovano. 


Platny parametr klicoveho slova SPACEB je cele Cislo od ! do 3. Klicové slovo SPACEB je ignorovano. 


0318 _Klicove slovo LABEL obsahuje neplatny parametr 


Parametr klicoveho slova LABEL musi byt uveden tak, jak vypada vy navéSti souboru, popr. navésti 
diskety. Tento parametr mize byt zapsan v jednom ze dvou tvard: 

1) *vvvvvy.hhhhhhhh nebo 

2) Ahhhhbhh, 

de vwvvv znamena jmeno diskety, jak je zapséno v navesti VOL! a hhhhhhhh znamena jmeno souboru, 
Jak Je zapsano v navésti HDR1. Kli¢ové slovo LABEL je ignorovano. 


Prvni parametr klicoveho slova RECID musi byt zapsan jako #P0Sn, kde n je pozice znaku v zaznamu 
(oc 1 do 8192). Druhy parametr musi byt zapsan jako jediny znak uzavfeny v apostrofech. Klicové 
slove RECID je ignorovano. 


= slovo MARK obsahuje neplatny parametr 


Platny parametr klicoveho slova MARK musi byt zapsan jako #P0Sn, kde n je pozice v zaznamu 
(od 1 do 8192), kterd ma byt oznaéena, 


uxt Klicove slovo YMARK obsahu 


parametr 


Platny parametr klicoveho slova VMARK musi byt zapsdn jako #P0Sn, kde n je pozice v zaznanu 
(od 1 do 8192), ktera ma byt oznacena, 


032 


ve slo 


ahuje neplatny paranetr 


Stredni 


Platne parametry ‘licoveho slova DSPATR jsou BL, CS, HI, ND, RI a UL. Neplatny parametr je ignoro- 
van. 


PS-20 DE/RPG - Popis jazyka 


@ slovo CHECK absahuje neplatny parametr 


qga)_Miieo 
Steednt 


flatné paranetry k1icového slova CHECK jsou AD, AS, BC, BV, BY, DD, DR, FE, Gxx, LC, ME, MF, tix. 
ig, Rac. Neplatny paranetr je ignorovan. : 


fey _Kiitové slovo © 


Strednt 


Alitové slovo COMP ndze mit tri parametry: relace, data, indikdtor. Relace musi byt EQ, NE, LT, CT, | 
Lf rebo CE, Paranetr data musi byt take zadan a ndze to byt jméno definovaného pole nebo proménné, fi 
fonstanta nebo aritmeticky vyraz zahrnujici scitani, odéitani, nasobeni a déleni s konstantami, 
jpény definovanych poli nebo pronénnych, Parametr indikator je nepovinny a mize byt zapsén jako | 
tislo 0! az 99. Jsou-li prvni dva parametry neplatné, klicovée slovo COMP je ignorovano; jinak je | 
igorovan tfeti paranetr. 


(85 _Kligové slovo XCHK obsahuje neplatny_parametr 


st 
(ticove slovo XCHK vyzaduje tri parametry v uvedeném poradi: 
1) Jaéno tabulky, kterd obsahuje ciselné tidaje. 

2) Prvni argument - jméno ciselné proménné. 

J) Druhy argument - jméno Eiselné proménné. 

flicové slovo XCHK je ignorovano. 


Nigové slovo RANGE vyzaduje dva Parametry 


3 - dolni a horni mez, které mohou byt zadany jako kons- 
fanty nebo jako jména poli. 


Mer_Wticové slovo RANGET obsahuje ne 


etr 


Stredni 


ie slovo RANGET vyZaduje jnéno tabulky jako prvni parametr. Tabbulka musi obsahovat dvojice 

ee aA a horni meze. Druhy parametr ~ index - je Nepovinny a zapisuje se jako jméno Cisel- 

ile pole, do néjz se uklada hodnota indexu po vyhledavaci Operaci. Je-1i prvni parametr neplatny, 
ve slovo je ignorovano; jinak je ignorovan druhy parametr. 

HEA slovo LOOK obsshuje neplatnj_paranetr 


Wet 


tio , ; ’ a 

Fy LOOK vyzaduje jmeno tabulky jako prvni parametr. Tabulka obsahuje hodnoty porovnavané 

Pole, Je-}j wide Pole. Druhy Parametr - index - je nepovinny a zapisuje se jako jméno Ciselného 
Prvnt parametr neplatny, kligové slovo je ignoravano; jinak je ignorovan druhy parametr. 


WA K1ig 
<n 


@ slovo SEQ obsahuje neplatny 


Stredn 
al 


Witove slovo SEQ vyz 
fo Q vyzZadu y 
\ yzaduje jedin 
Heat slovo seq je Sporciana 


Parametr - relaci, tj. jeden z kédd EQ, NE, GE, LE, GT, LT. 


Priloha 5. Chybové zpravy prekladate DE/RPG 


Kligove slovo SHIFT vy: 


zce slozeného z tolika znaki, kolik ma ystupni 


2 rametr ve tvaru Fete: hoz k i 
ate Pee Ay Dy Hy Ny Wy Yo X, Y. Kligove slovo je ignorovano. 


pole pozic- Platné 


PHT obsahuje neplatny_pa 


PMT vyzaduje paranetr tyoreny zpravou ¥ délce 1 az 200 znakd. Kliéové slovo je 


Klitové slovo 
ignorovano. 


huje neplatny.parametr 


Stfedni 
Kligové slovo ADD vyzaduje jeden parametr, ktery je jmenem stradate, tj. Ciselného pole. Klitove 


slovo ADD je ignoravano. 
platny_paranetr 


6 slovo SUB obsahuje 


Ki{Zové slovo SUB vyzaduje jeden paranetr, ktery je jménem stfadace, tj. ciselneho pole. Klicove 


slovo SUB je ignorovano. 


Jove AUXDUP_obsahuje neplatny_parametr 


vyzaduje jeden parametr ~ jméno zdroje duplikovanych dat, tj. jméno defino- 


Kligove slovo AUXDUP ‘ 
slovo ARXDUP je ignorovano. 


vaného pole. Klicove 


0335 _KliGové slovo AUNST obsahuje neplatny_paranetr 


Kligové slovo AUXST vyzaduje jeden parametr — jméno cile ukladanych dat, tj. jméno pole. Klicove 


slovo AUXST je ignorovano. 


oeplatny_parametr 


0336 _Kligoyé slovo EDTCDE obsahuje 


Stfedni 

r - edigni kod (1, 2, 3 4) Ay By Cy Dy Jyh 
nepovinny a musi to byt bud hvezdicka 

tr neplatny, je kligove slovo ignore 


Kligové slovo EDTCDE vyzZaduje jeden povinny paramet 
L, 4, X, Y, 2). Druhy parametr - pohyblivy symbol - je 
nebo ménovy symbol uzavreny v apostrofech. Je-li prvni parame 
vano; jinak je ignorovan druhy parametr. 


Platny parametr klicoveho slova INSERT mize byt jeden z nasledujiciho seznamu: 

- Jméno znakového nebo Ciselného pole. 

= Aritmeticky vyraz obsahujici nejvySe 30 operandi nebo 256 znaké. ee 

= Inakova nebo ciselnd konstanta; u znakového vstupniho pele musi byt znakova konstanta, & cise" 
neho pole Ciselna konstanta. 


P5-22 DE/RPG - Popis jazyka 


Kligové slovo INSERT je ignorovano. 


0 SETOF obsahu 


og Kuic 
Stredni 


Platny parametr je dvouciferné Cislo indikatoru 01 az 99. Kliéov io SETOF 
+ Kiiové sloy nor 
ETOF je i a 
gnorovano. 


platny _paranetr 


Platny parametr je dvouciferné Cislo indikdtor z 
u 01 az 99. Klizové 
. slovo SETON 5 
J& ignorovano. 


cH0_Xl 


Stfedni 


Platnj paranetr je jméno Ciselného pole. Klitové slovo RESET je ignorava 
ia ravano, 


OO Kili 


Kliové slovo SUBST vyZaduje dva 6 

: i povinné 
polozky, které se porovndvaji s obsahem atinat 
dosazuji do ystupniho pole. Treti parametr - in 
desetinnych mist. Je-li treti paramet? neplatny 


try - jména dvou tabi 
j ulek. Pryni 
ie : v 1 tabulka 
ee druha tavulka obsahuje plecly tele 
i ide eat a je to jmeno Ciselného pole bez 
‘any jinak je ignorovano kli¢ove slovo, 


Klitové slovo INDEX mize obsahovat b id jeden parametr - pamat, ¢ cel 
j et, eer 
qs © Cislo, nebo jeden para 


tetr - jnéno indexového souboru n, sket ebo of rametr: in la z 
nen ind a diskete, an 
i 0 oba parametry, Jméno soubor musi byt zapsano 


Obsahuje neplatny paranetr 


: z : ¢ no. 
Platny parametr je #10 ny kde n je cislo 1 az 9, Kiidove slovo TADD je ignoro 


UB obsahuje neplatny paranetr 


*lalny paranetr 
je *T0Tn, kde n je é 
Je Cislo ! az 9, Klidove 5) 
* slovo TSUB je ignorovano. 


NO_ERPOR obsahuje neplatny paranetr 


Nlitové slovo eRe 
ROR vy: 
Paranetr je nepovinny 


Zaduje prvni Parametr - kG ray: 
kod zpra tje 8 Ci az 
ma m 'Y, tj. dvouciferné iso 01 az 99, Druhy 


seraty. Mi 2 F 

K ji ‘ = 

a Je to znakovy Fetézec o délce nejvyse 39 znaki uzavreny v apostrofech. 
eplatny, klicové slovo Je ignorovano; jinak je ignorovan di uhy paramet 


Priloha 5. Chybové zpravy prekladade DE/RPG 5-02 


Stfedni 


Platny parametr je bud znakova konstanta (uzavrend v a fech) nebo jmeno znakového pole, kterg 
obsahuje prihlasovaci informaci. Klicové slovo LOGON je ignorovano, 


Platné parametry se uvadéji v tomto potadi: 
1) Eiselna konstanta - pocet pouzitych polozek tabulky nebo 
*ALL pro vSechny polozky. Tento parametr je povinny. 
2) Ciselna konstanta - potet vynechanych pozic mezi polozkami. Tento parametr neni povinny. 
Je-li prvni parametr neplatny, je klicové slove ignorovanoy jinak je ignorovan druhy parametr. 


Kliové slovo SETON plati jen v prikazu Pro popis pole, je-li zarizeni CRT. 


Nepiati v prikazu 
Pro popis zaznamu. Klicové slovo SETON je ignorovano. 


Klicové slovo SETON plati 
¥ prikazu pro popis pole. 
ignorovano, 


jen v prikazu pro popis Zaznamu, je-li zaFizeni jiné nez CRT. Neplati 
Pouziva se ve spojeni s klicovym sloven RECID. Klicové slovo SETON je 


Klicové slovo SETOF 
Popis zaznamu. Kliové slovo SETOF je ignorovano, 


plati jen v prikazu pro Popis pole, je-li zarizeni CRT. Neplati y prikazu pro 


am 


Klitavé slovo SETOF plati jen v prikazu 


v prikazu Pro popis pole. Pouziva se ve spojeni s klicovym slovem RECID. Klicové slovo SETOF je 
ignorovano. 


Pro popis zaznamu, je-li zarizeni jené nez CRT. Neplati 


PS-24 DE/RPG - Popis jazyka 


parasete #705n zadava znakovou pozici, kterd Presahuje délky logického zaznamu 


Ku zaznamu; Klitové slovo ig 


Paranetr #P05n zadava znakovou pozici, kterd Presahuje délku logického Zaznamu 


i 


Stfedni 


Paranetr #P0Sn zadava znakovou pozici, kterd Presahuje délky logického zéznamy 


Ol_Klicove ignorovano 


Stfedni 


Pfiloha 5. Chybove zpravy prekladate DE/RPG PS5-25 


Klicova slova platna s *RTN jsou pouze SETON, SETOF, RESET, EXSR. 
vkladana data. #RTN neni datove pole. 


Klicova slova platna s #RTN jsou pouze SETON, SETOF, RESET, EXSR. 
vkladana data. #RTN neni datove pole. 


é slovo XCHK nenilze byt pouzito s #RINj ignorovano 


| Stfedni 


Kliéova slova platna 5 #RTN jsou pouze SETON, SETOF, RESET, EXSR. 
i) vkladana data. #RTN neni datové pole. 


Kli€ova slova platnd s #RTN jsou pouze SETON, SETOF, RESET, EXSR. 
vkladana data. #RTN neni datové pole. 


I] 0405 ___Klicove slovo RANGET nendze byt _pouzito s *RTN; ignorovéno 


} Stredni 


| Kligova slova platnd s *RTN jsou pouze SETON, SETOF, RESET, EXSR. 
vkladana data. #RTN neni datové pole. 


Cove slovo LOOK nenize byt pouzito s *RTNj_ ignorovéno 


Kli€ova slova platnd 5 #RTN jsou pouze SETON, SETOF, RESET, EXSR. 
vkladana data. *RTN neni datové pole. 


Klicova slova platna s #RTN jsou pouze SETON, SETOF, RESET, EXSR. 
vkladana data. #RTN neni datové pole. 


‘ove slovo DSPATR nemize byt _pouzito s #RTN} ignarovano 


Kli€ova slova platna s *RTN jsou pouze SETON, SETOF, RESET, EXSR. 
vkladand data. #RTN neni datové pole. 


PS-26 DE/RPG - Popis jazyka 


Tato klicova slova nevyzaduji 


Tato klicova slova nevyzaduji 


Tato klicova slova nevyzaduji 


Tato kli€ova slova nevyZaduji 


Tato klifova slova nevyzaduji 


Tato klitova slova nevyzaduji 


Tato kliéova slova nevyzaduji 


Tato kli€ova slova nevyzaduji 


wn, Xizove slovo SHIFT nendze byt pou 
o_Xuicove. 5 


\iiéova slova platnd s #RTN jsou pouze SETON, SETOF, RESET, ExsR 


A Te itova ¥ 
jldand data. #RTN neni datové pole, ato kligovd slova nevyzaduji 


wo Kligove slovo ADD nemize byt pouzito s + 
Mee ere eaeee ee ne et ~_POUZILO 


Siredni 
Sires 


(liga slova platné s #RTN jsou pouze SETON, SETOF, RESET, EXSR, 


viliénd data, #RTN neni datové pole, Tato kligova slava nevyéadu) 


Wul_Kigové slovo SUB nendize byt pouzito 


(liéovd slova plat s #RTN jsou pouze SETON, SETOF, RESET, EXSR, 


vilidand data. #RTN neni datové pole. Tato klitové slova nevyzaduj i 


Nj_ignorovano 


flitovd slova platnd 5 #RTN jsou pouze SETON, SETOF RESET, EXSR, ifova a0 50 
wilidand data. #RTN neni datove pole. : ‘ : » Tato klitovd slova nevyzaduji 


Wil_HliGove Slovo AUXST nendze byt_pouz: 


_ignoravano 


Stein 


Nligoé slova platnd s #RTN jsou pouze SETON, SETOF, RESET, EXSR. 


iin dala, 4RTN neni datové pole. Tato klicova slova nevyzaduji 


x) 


Wlitové slova platnd s #RTN J80u pouze SETON, SETOF, RESET, EXSR, 


id dta, ART nent datoce Aste Tato klitova slova nevyzaduji 


_5_#RTN;_ignorovana 


se 


Ad stove Platnd s #RTN jsou pouze SETON, SETOF, RESET, 


wlan’ data, 4RTN neni datové pole EXSR. Tato klicovd slova nevyZaduji 


0 s_#RTN}_ignorovano 


Wtod slova platng 
reve $ #RTN jsou pouze SETON, SETOF, RESE gee 5 : 
data. #RTN neni datové rae TUN I T, EXSR. Tato kligova slova nevyzaduji 


Priloha 5. Chybové zpravy prekladate DE/RPC P5-27 


icove 
oo_Kice 

ee sii : 
cova rz i i obousmérné pole, 
Kli€ova slova platna s *RTN jsou pouze SETON, SETOF, RESET, EXSR. Tato klicova slova nevyzadu): cféné stovo ADD plati jen pro vstupni net pole 
vkladana data. #RTN neni datove pole. 


0 CHECK plati_jen pro uziti I, B;_ignor 


wat 
coe se 
—_ \ijine slovo CHECK plati jen pro vstupni nebo obousmérné pole. 
klicova slova platna s *#RTN jsou pouze SETON, SETOF, RESET, EXSR. Tato kliéova slova nevyzadu)i ss 


i jen pro uz 
vkladana data. *RTN neni datove pole. COMP plati_jen pro u 


ignorovano 


Stredni 


((iéoe slovo COMP plati jen pro vstupni nebo obousmarnée pole, 


Kliova slova platnd s #RTN jsou pouze SETON, SETOF, RESET, EXSR. Tato klicava slova nevyzaduri ND KliGove i jen pro uditi I, Bj ignorovano 
vkladana data, #RTN neni datove pole. 


{ligové slovo ERROR plati jen pro vstupni nebo obousmérné pole, 


Pa Saree y_Klitove slovo | 
Klitova slova platnd s #RTN jsou pouze SETON, SETOF, RESET, EXSR. Tato klicova slova nevyzaduji 5 ncaa 
vkladana data. #RTN neni datove pole. sie 


Ohe3 _Kli¢ové slovo INSERT plati jen pro uziti 1, By Wj ignoravano 


{licow slovo LOOK plati jen pro vstupni nebo obousmérné pole, 
Stfedni 


Stfedni MS _Micové slova PAT plati_jen pro 


ti I, B; ignorovano 


Ulitové slovo PHT plati Jen pro vstupni nebo obousmérné pole, 


B, W;_ignorovano 
SOUS Sing DOr evene 


Cito slovo RANGE Plati jen pro vstupni nebo obousmérné pole, 
WO Ki 
ve it 


ies 


Sk plati jen pro uziti 1, B, Wj ignoravano Wn sow 0 pats jen pra Bes Frels ots 
2. nel Obousime 
Ml slo 


Wade 


erné pole, 


$ a, ? dati jen pro ziti 1, B; ign 
Kli€ove slovo EXSR plati jen pro vstupni, obousmérné nebo Pracovni pole. Tonnnnd nde 


‘Nos : 
OO SHIFT plat; Jen pro vstupni nebo Obousmérné pole, 
PS5-28 DE/RPG - Popis jJazyka 


PFiloha 5. Chybové zpravy pFeklédace DE/RPG P5-29 


Stredni 


Kli€ové slovo SUB plati jen pro vstupni nebo obousmérné pole. 


Stredni 


Klicove 


Stfedni 


Kli€ové slovo AUXDUP plati jen pro vstupni nebo obousmérné pole, 


Ohke _Kliove sh 


Na zarizeni CRT Plati kligove 


Slovo EDTCDE jen ¢ - i i 24 an prikazeo 
WRITE ve formlari C, Klizove Jen tehdy, je-1i Odpovidajici zaznam zapisovan pr 


Slovo EDTCDE je ignorovano, 
0449 7 této kombin, ributd v; 


Stfedni 


K 
‘ombinace Zobrazovacich atributd RI, UL a HI dava atribut ND (nezobrazované pole). 


5-30 DE/RPG - Popis Jazyka 


4s _Typ dat _pro_ SHIFT 
Stfedni 


Jeli v rubrice “Typ dat" kod C, je kligové slovo SHIFT povinné, Neplati vsak, je-li v rubrice 
je-li aight 
“Typ dat* jiny kod. 


Bj_ignoravano 
Klitove slovo DSPATR plati jen pro vstupni, vystupni nebo obousmérné pole, 
0452_Konstanta_plati 9;_ignorovana 
Sted 


Konstanta plati jen pro vystupni pole. 


Stfedni 


Na konstantu nelze odkazovat jménem, aby nemohla byt pri vypoctu menéna; proto nesmi byt pojmeno- 
vana. 


WS5_Neni_zadino kli¢ové slovo SHIFT; 
Stredni 


Byl zadan typ dat € {sloupec 35), ale chybi kligové slovo SHIFT. Za typ dat se misto C dosadi 
rezera. 


Povinné parametry kligového slova jsou tyto: 
Potet Fadk: Potet pozic: 
6 80 (480 znakd na stinitku) 
80 (960 znakd na stinitku) 

4 80 (1920 znakd na stinitku) 

Nitové slovo DsPsiz je ignorovano. 

#SR_Mlitové slovo FORK bez_paran 

Sfedni 


Povinny parametr je délka cele stranky; musi byt celé cislo. 


PFilona 5. Chybové zpravy prekladate DE/RPG PS-31 


0803 


Stredni 


Favinné parametry jsou: relace (EQ, NE, LT, GT, LE, GE) a data zadana jako jmeno pole, 


nebo aritmeticky vyraz. 


Povinné parametry jsou tri, v tomto poradi; 
~ jméno tabulky 5 Ciselnymi polozkami, 

~ argument! - jméno Eiselného pole, 

~ argument? - jméno ciselného pole, 


ano 


parametr je editni kéd (1, 2, 3, 4, A, B,C, D, J, Ky L, M, X, Lin ale 


Povinny Parametr je zdro} dat vyjadFeny jednim z téchto zpdsobi: 
- jmenem pole, 

~ aritmetickym vyrazem, 

- konstantou. 


Fovinné parametry jsou dva: jméno 1, tabulky a jméno 2, tabulky, 


ove BLKING bez parametrd; ignorovs 


konstanta 


Musi byt zadan alespos jeden ze dvou parametrd: prvni *DBL (dve V/V-oblasti), druhy #FMTL nebo 


mir oeiaients Aare 
*FMTS (neblokované a nenavazujici zaznamy nebo Slokovane a Mavazujrc1 zaznamy). 


2 DE/RPG - Popis Jazyka 


Kiigové_slovo NUMENT bez parametrd;_ignorovano 


tll 


Sted 


si byt zadén alespoh jeden z téchto kadd: AD, AS, BC, BV, BY, DD, DR, FE, Gxx, LC, ME, MF, Mx, 
8, RL RZ 


@ slovo DSPATR be 


Stiedni 


fusi byt zadan alespon jeden z téchto kddd: BL, CS, HI, ND, RI, CA, UL. 


OSih_K1i€ove slovo MARK bez parametrd; ignorovano 


G515_Klicové slovo VMARK bez paranetrd; ignarovano 
tn 
Fovinny parametr je #POSn, kde n je Cislo oznacované pozice. 


bez parametrd; ignorovano 


Povinny paranetr je znakovy fetézec uzavFeny v apostrofech obsahujici tolik znaki, kolik je v poli 
poric. Platné znaky jsou A, D, Hy N, W,V, Xa, 


__Paranetrd;_ignorovano 


sean 
Povinny paranetr je jméno disketového souboru z navésti HDRI, 


MRE_Kiiéové slovo ADD bez parametrds ign 


ano 
Sifedai 

Fovinny paranetr je jméno Eiselného pole. 
2_Wiové slovo SUB bez paranetrd; ignoravina 
Stfedni 


Povinnj paranetr je jméno Eiselného pole. 


Priloha 5. Chybové zpravy prekladace DE/RPG PS5-33 


StFedni 


Povinny parametr je jméno definovaneho pole (zdroje dat). 


Stredni 
Povinny parametr je jméno pole (cile dat). 


ignorovano 


Povinny parametr je jméno tabulky obsahujici dolni a horni meze kontrolovanych rozsahd hodnot, 


23 


05: 


Euan, parametr je celé cislo od 1 do délky stranky. (Délka stranky je zadana kliéovym slovem 
FORM.) A 


ay Parametr je celé Cislo od 1 ao délky stranky. (Delka Stranky Je zatena klidovym slover 
mM). 


gnorovano 


Povinny parametr je *10Tn, kde n je Cislice 1 a3 9, 


PS-34 DE/RPG - Popis Jazyka 


weh_Kligové s 


Povinny parametr je #70Tn, kde n je Cislice 1 az 9, 


Stiedni 

Povinny parametr je jméno Ciselného pole, 

(631_Kligové slovo SEQ bez parametrd; ignorovano 
Stiedn! 


Povinny parametr je jeden z téchto symbold: EQ, NE, GSE, LE, GT nebo LT, 


Stfedni 


Povinny paranet? je bud velikost paméti pro index (celé Eislo) nebo jméno indexového souboru na 
disketé, 


{SN _Kiicové slovo EXSR bez paranetrd; ignorovéno 


aes 


foviny parametr je jméno podprogramu. 


Stedni 


Stfedni 

Povinny parametr je dvouciferné Eislo indikétoru od 01 do 99, 
MSk_Migové slovo PAT bez pa 
Sted 


ignorovano 


fovinnj parametr je libovolny text o délce 1 a3 200 znaki, 


Povinny paranet r Je celé Cislo od 1 do 2, 


PFiloha 5. Chybové zpravy prekladate DE/RPE PS-3: 


Povinny parametr je znakova konstanta (uzavfend v apostrofech) nebo jméno pole obsahujiciho Prihla~ 
Sovaci infcrmaci. 


norovano 


Povinny (prvni) parametr je bud celé Cislo vétéi nez 0 nebo slovo ALL. 


PS-36 DE/RPG - Popis jazyka 


Stredni 
Kii€ove slovo ARRATR mize obsahovat jeden nebo dva paranetry, Prvni je potet pouitych tabulkovych 
poloiek, “ruby (nepovinny) je pocet mezer mezi polozkami, 


_PLKING obsahuje prebytetné paranetry; jsou ignoravény 


\ligové slovo BLKING mize obsahovat jeden nebo dva parametry. Pryni, #DBL, oznatuje dvé V/V-oblas- 
tiy druhy, #FMTU nebo #FMTS, zadava neblokované a Nenavazujici zaznamy nebo blokované a navazujici 


zaznany. 


Y 


Klitove slovo DSPSIZ vyZaduje dva parametry. Pryni je pocet druhy potet pozic y Fadku, 


0552 Kiigove slovo FORM obsahuje prebytetné paranetry; jsou ignorovény 


Stredni 


V kligovém slové FORM lze zadat nejvyse tri parametry: délku stranky (celé dislo), ¢islo posledniho 
titngho Fadku (celé Zislo) a dvouciferné islo indikatoru (01 az 99), 


$352_Kliéové slovo NUME huje prebytetné parametry; jsou ignorovany 


V Kligovém slové NUMENT Ize zadat jen jeden parametr — potet zaznami (celé isic}, 


Parametry; js 


OSH Ki obsahuje prebytetne 


Stredni 
V Kligovén slové SPACEA Ize zadat jen jeden parametr - celé Cislo od 0 do 2. 


_paranetry;_jsou_ignorovany 


V klicovés slové SPACER lze zadat jen jeden parametr - celé ¢islo 1 az 3 


0556 Kuié @ slovo RECID obsahuje prebytetné parametry; jsou ignorovany 


1 Kitovée Slové RECID Ize zadat dva Parametry: prvni je #P0Sn, druhy je znak uzavfeny ¥ apostro- 


fec 


21_Klifové slovo MARK obsahuje pe 


Stredni 


V klitovg : 
KiCoveén Slové MARK Ize zadat jeden parametr tvaru #P0Sn. 


PFiloha 5. Chybové zpravy prekladate DE/RPG P5-27 


StFedni 
V kligovém slové SHIFT lze zadat jeden parametr ve tvaru znakoveho fetézce, ktery musi obsahovat 
tolik znaki, kolik je ve vstupnim poli pozic. Nesmi obsahovat mezeru. 


Stfedni 
V kligovém slové EDTCDE 1ze zadat nejvySe dva parametry: prvni je edicni kéd, druhy je syabol 
v apostrofech (hvezdicka nebo dva znaky menoveho symbolu). 


Kligové slovo LABEL obsahuje prebytecné parametry; jsou ignorovany 


StFedni 


V kligoveém slové LABEL Ize zadat jeden parametr: jméno disketového souboru z navéesti HORI, 


0562_Kliéavé slovo ADD obsahuje prebytecné paranetry; jsou ignorovany 


stent 


V klicovém slové SUB lze zadat jeden parmetr: jméno ciselného pole. 


V kliCovém slové XCHK se zaddvaji tri parametry v tomto poradi: 
~ jméno Eiselné tabulky, 

~ argument! - jméno éiselného pole, 

~ argument? - jméno Ciselného pole. 


PS-38 DE/RPG - Popis jazyka 


0s47_Klitové slov uje_prebytetné 


Stfednt 

\ kligovém slové RANGET se zadavaji dva paranetry: jméno tabulky a jméno €iselného pole (index), 
0s8__K1i¢ove slovo SUBST obsahuje prebytetné pai _isou_ignorovany 
send 

\ kligoven slové SUBST lze zadat nejvy$e tii parametry: 

- jpéno prvni tabulky, 


~ jnéno druhé tabulky, 
- jnéno Eiselného pole - indexu (nepovinné). 


V klitovem slové LOOK se zaddvaji dva parametry: jméno tabulky a jméno iselného pole (indexu). 


Vklicoven slové COMP se zadavaji fi Parametry: relace (EQ, NE, GT, LT, GE, LE); data (jméno pole, 
aritneticky vjraz, konstanta) a indikdtor (01 az 99). 


Febytetné pa 


V klicovém slové INSERT se zadava jeden parametr (jméno pole, aritmeticky vyraz nebo konstanta). 
0572 
Stredni 


V kligoven slove SKIPA se zadava jeden parametr - celé Eislo od 1 do délky stranky. (Délka stranky 
Se zadavd v kl iCovém slové FORM). 


#3 _Mi Yi_jsou 
Sie 


VKligovéa slové SKIPB se zadava jeden parametr - celé Cislo od 1 do délky stranky. (Détka stranky 
S* zadava v klicovém slové FORM). 


Sh_Klifové stovo ERROR obsahuje preby tet 

Sed 

V Kiitovén Slové ERROR Ize zadat dva pParametry: dnouciferny kéd (01 az 99) a nepovinny text 
"avreny V apostrofech. 

0975 


isis any 
Stredni 

Viblicorogst eters tert ; 
Covoém Slové RANGE se Zadavaji dva parametry: doln{ a horni mez. 


PFiloha 5. Chybové zpravy prekladate DEYRPC PS-39 


Stredni 


V kiicovém slové RESET se zadava jeden parametr - Ciselné pole, 


V klicovém slové INDEX Ize zadat nejvySe dva parametry - pamét a soubor. 


Ovo SETOF obsahuje prebytet 


Stedni 


V klicovém slové SETOF se zadéva jeden parametr - indikator (01 az 99), 


OS83 _Kiiové slovo SETON Obsahuje_preby 


V kliovém slové SETON se zaddva jeden parametr - i 


é Slovo LOGON obsahuje prebytetng para 


Stredni 


V klicovém slové LOGON se zadava jeden parametr - 


: ji bud znakovy Fetézec uzavFeny v apostrofech, nebo 
jméno pole, 


PS-40 DE/RPG - Popis jazyka 


(85 _Druhj paranetr kicoveho slova EDTCDE neplati s kédy x, Y, 7 


Oruhy paranetr je ignorovan. 


(6% Pro toto zara 


Stfedni 
Pro neplatné zarizeni byla specifikovana konstanta; je ignorovana, 


(67_V-kliéovem slové DEVICE musi byt zadé £58)_}@-1i_zadano_JOBOPT  #NOPHT) 


Stredni 


Jeli zadano kligové slovo JOBOPT(#NOPMT) v prikazu Pro specifikaci Wlohy, musi byt v klidovém slove 
TEVICE zadéna adresa u vSech soubor’ kromé prikompilovanych tabulek. U zarizeni CRT nesmi byt zadan 
logicky identifikdtor. Neprovede se Z4dné akce, 


(601 Prvni pri 
Teka 
Prvni prikaz zdrojového programu musi byt prikaz pro specifikaci Ulohy. Preklad je ukongen, 


0402 ifi 


Stredni 


fo prvnim prikazu formulare Z by) ZjiStén prikaz pro specifikaci Ulohy. V programy je povolen 
jen jeden prikaz pro specifikaci tilohy. 


chybné kl icové slovo 


Stedni 


\ pfikamu pro speci fikaci Ulohy plati jen tato klicova slova: JOBOPT TFILE, CFILE, SFILE, PRIFILE, 
ATE, EDITC, SHARE, SHARER, STATUS, ENTRATR, EQJCTL a EXITATR. Chybné klicové slovo je ignorovano. 


bné kli¢ove slovo 


\ pétkazu pro vstupni format plati jen tato klicova slova: SLNO, CLRL, WRITE a £0J. Chybneé klicove 
slovo je ignoravano. 


obsahuje chybné k1igové slovo 


Mfedni 


Voiikazy pro prohlizeci format neplati Zadné kliéové slovo. Kligové slovo je ignorovano. 


Mt Voazu na podprogram plati_ jen kl 


Stredni 


vé_slovo EOJ 


ide j, any 3 ti 
lestlite Je v prikazu pro vstupni formit zapséno jméno podprogramu (ve sloupcich 10 az 19), plati 
"ne jen klizové slovo EQJ. Neplatné kliové slovo je ignorovano. 


PFiloha 5. Chybové zpravy prekladate DE/RPG PS-41 


0612 _Kli€ove 


Stredni 


V klicovém slové JOBOPT lze zadat nejvySe dva parametry - *NOOPT nebo #NOOPEN nebo oba. 


Parametr "jméno" kli€ového slova SFILE musi byt jménem disketového souboru. 
Ob17__Kliové slovo TILE bez_parametru 
Stiedni 


Klitove slovo TFILE musi obsahovat parametr "jméno" a mize obsahovat parametry "pocet" 3 "resin", 
Kli€ové slovo TFILE je ignorovano. 


Q618 _TFILE neoznatuje disketovy soubor 


Parametr "jméno" v klicovém slové TFILE musi byt jménem disketového souboru. Klizové slovo TFILE 
je ignorovano. 


Klicove sloyo TFILE chybi, ale je povinné 


Klicové slovo TFILE musi byt zadano, jJsou-li pouzivany funkce transakénihe souboru. 


0621 _TFILE plati, jen kdy 


Téeks 


Kligove slovo TFILE nemize byt zadino, jestlize v prikazech pro vstupni format nejsou zaddny speci- 
fikace zaznami na klavesnici/obrazovce. 


Platne parametry jsou: jméno, poget a rezim. Parametr "jméno" je povinny a musi byt zapsan jako 
Prynij musi byt jménem disketového souboru. Parametr “potet" je Nepovinny a zaddva pocet zapisova- 
nych platnych zaznam mezi vkladanymi nepla: dznamy. Parametr "rezim" je nepovinny a urtuje 
rezim zpracovani transaké 9 souboru; platné hodnoty jsou #ENTER, #UPDATE, #VERIFY, 4ADD. a RERUN. 
Parametry "pocet" a "rezim" mohou byt zapsany v libovolném poradi za parametrem "jmeno". 


PS-42 DE/RPG - Popis jazyka 


oj Kligové slovo CFILE obsahuje neplatny paranetr 
a 
sida 


‘sina platnym paranetrem je jméno disketového souboru, z n&hoz se kopiruji data, K1itové slovo 
(FILE je ignorovano. 


ws Klitove slovo PRTFILE obsahuje neplatny parametr 
(h5_Kiicove stove ns---==---25 1 E erence 


sii 


etinjm platnym parametrem je jméno, které predstavuje tiskovy soubor. Kli¢ové slovo PRIFILE je 
iorovano. 


parametr 


Miekiteovelsiova DATE obsahuje neplat: 


flatny paranetr je bud #DMY, nebo #YMD, nebo *MDY. Klitové slovo DATE je ignorovano, 


y_parametr 


flalny parametr musi specifikovat pét znaki uzavrenych v apostrofech. Inaky se zapisuji v tomto 
poradi: 
122 znak - ménovy symbol, 


‘mak ~ znak pro vyznateni desetinnych mist v cisle, 
4, mak - znak pro oddéleni tisicd, 
Sv mak = znak pro Clenéni data. 


Miitevé slovo EDITC je ignorovano. 


Stredni 

7h) paranetr je juéno 4nistnéha pole bez desetinnych mist. Kligové slova STATUS je ignoravéno. 
Stredni 

Matné paranetry jsou BL, CS, HI, ND, RI a UL. Kligové slovo ENTRATR je ignorovano. 

‘2 Hitéslove sino obsahuje neplatny paranetr 

Stredni 

etn 

a Paranetrem je Eislo udavajici prvni pouzity fadek obrazovky, tj, cele Eislo vétsi nebo rov- 
Ht {nebo 3 pri Pouziti kligového slova PMT) a men3i nebo rovné potty radkd obrazovky. Klitové 
Slo SND je ignorovano. 


SS ki 


Ene slovo CLRL obsahuje neplatny paranetr 
edn 


Pat oa ne 
“Mii perasetren je bud isio nebo +N0. KIiZové slovo CLRL je ignoravéno. 


PFiloha 5. Chybové zpravy preklddace DE/RPG P5-43 


Platnym parametrem je bud jméno nebo #Nd. Kligové slovo WRITE je ignorovano. 


Prvnim parametrem musi byt jméno disketoveho souboru. Druhy parametr :e nepevinny a udava volby 
pro zapis statistik: #JOB, *STATION nebo *BOTH. 


‘ave slovo EQJCTL_ob: platny parametr 


Kligové slovo EOJCTL bud nemusi obsahovat Zadne parametry, nebo musi obsahovat libovolnou kombinaci 


ndsledujicich parametrd v libovolném poradi: 
- format (identifikatni kod formatu), 

= indikdtor (01 az 99), 

- *STATUS. 

Klitové slovo EDJCTL je ignorovano. 


ove slovo TFILE obsahuje prebytecne pi 


Platné parametry jsou nejvyse tf - pavinné, jméno souboru, nepovinny potet platnych zaznami mezi 
neplatnymi zaznamy a nepovinny rezim vypottu. 
Prebytecné parametry jsou ignorovany. 


Jedinym parametrem je jméno souboru, z nehoz se kopiru) S slovo CFILE je ignorovanc. 
y' i} P je 1g 


ove slovo PRIFILE obsahuje ofebytecne pa 


Jedinym paranetrem je jméno souboru, na nejz se tisknou zaznamy. Klicove slovo PRIFILE je ignoro- 
vano. 


0639___Kligove sloyo EDITC obsahuje prebytetné pa 


Stredni 


Jedinym parametrem je jméno pole. Klicové slovo STATUS je ignorovano. 


PS-44 DE/RPG - Popis jazyka 


Stredni 


Jedinja paranet rem mize byt bud Cislo, nebo #NO. Klitove slovo CLRL je :gnorovano 


Stredni 


Jedinya parametrem mize byt bud jmeno nebo #NO. Prebytetne parametry jscu ignorovany 


y 


V klitoven slove EDJ lze zadat nejvyse tri parametry - jméno 
’ 


retry jsou ignorovany, zarizeni a *PASS. Prebytecné para~ 


Jedinya pararetrem mize byt bud *DMY, nebo #YMD, nebo ¥*DY, Prebytecn® corcned 


ccrametry jsou ignorovany. 


dew 


Stedni 


Viligovés slové SFILE mohou byt z, ys : 
Sodan u byt zadany nejvySe dva parametry - j}meno disketoveho souboru a volba 


#STATICN nebo *B0TH). Prebytecné parametry jsou ignorovany. 


QH7_KLigové slovo EQJCTL obsahuje 


Vidic e 
Rene pene Ize zadat nejvyse tFi parametry - format (ident: fikacni kod), indikator 
}» Prebytetné parametry jsou ignorovany. 


disketoveho souboru, z néhoz se kopiruji data. 


isi hy 
As} byt z 
“YS Zapsan - e)> 
Parametr - jméno souboru, na n@jZ se tisknou 


Chybové zp: dvy prekladate 2: 


Stredni 
Musi byt zapsan znakovy Fetézec uzavreny v apostrofech. Znaky musi byt zadany v tomto poradi: 
1. a 2. znak - menovy symbol, 
+ znak znak pro vyznateni desetinnych mist v Cisle, 
znak pro oddéleni tisicd, 
znak pro €lenéni data. 


zadan parametr - jmeno pole. 


0656 __Klicove slovo E 


Musi byt zadan jeden parametr - bud pocet radki k vymazu, nebo #NO k zachovani obrazu. 


Sten 


Musi byt zadan alespon jeden parametr - jméeno disketkového souboru. Druhy parametr je nepovinny - 
- volba zapisu statistik: #JOB, #STATION nebo #BOTH. 


0660 __ CFILE neplati; TFILE nezadano nebo neplatné 


Je zadano kligové slovo CFILE, ale klitové slovo TFILE bud nebylo zadano nebo je neplatne. Kligove 
Slovo CFILE je ignorovano. 


Parametr “yméno" v klicovém slové CFILE musi specifikovat jiny soubor nez je zaddn v TFILE, proto7e 
k transaknimu souboru lze prikopirovat data jen z jiného disketového souboru. 


PS-46 DE/RPG - Popis jazyka 


Je-li zadano klicové stovo PRIFILE, musi byt zadano také platné kli€ové slovo TFILE, K 


ORTFILE je ignorovano. 


Kiigove 53 
™ stovo PRIFILE smi byt zapséno jen jednou. 


Priloha 5. Chybové zpravy prekladace DE/RPG PS-47 


) 0678 Klicove slovo EXITATR je 


Kligové slovo EXITATR smi byt zapsano jen jednou. 
0679 _Kli€ove slovo SLNO_je duplicitni; 1gnorovano 
Stfedni 


Klitavé slovo SLNO smi byt zapsano jen jednou. 


0680 _Kli j_ignorayano 


Stredni 


Kligove slovo CLRL smi byt zapsano jen jednou. 


0681  Klitové slovo WRITE je duplicitni; ignorovano 


Kligove slovo WRITE smi byt zapsano jen jednou. 


0682 


Stfedni 


Kli€ove slovo SFILE smi byt zapsano jen jednou. 


P5-48 DE/RPG - Popis jazyka 


wh_K 


Safed 


ligova slova SHARE a SHARER sméji obsahovat nejvyse 14 jmen, 


paranetry Kligového slova SHARE (SHARER) musi byt jména soubord. Ne 
Jeourli vaechny parametry neplatné, klicove slovo je ignorovano, 


platné parametry jsou ignorovany. 
(iG, SFILE neplatiy TFILE nezaddno_nebo_neplatné 

stednt 

Jeli zadano klitové slovo SFILE, musi byt zadano platné klicové slovo TFILE. 

(68? 


Sten 


Klitové slovo SFILE nemize speci fikovat stejny soubor jako klicové slovo TFILE, CFILE nebo PRTFILE. 
\litove slovo SFILE je ignorovano. 


Stredni 


sali y kliovém slové ENTRATR zadany atributy HI, RI a UL je vysledek rovnocenny zapisu 
QMRATRIND), tj, nezobrazovana data. : : ee 


(iif Platné parametry v_kli 


Vidiovén slové EXITATR byl zadan neplatny parametr. Platné parametry - atribury ~ jsou BL, CS, 


Hl, "0, Ra UL, Neplatné parametry jsou ignorovany, Jsou-li neplatné véechny parametry, je klicove 
Slovo ignoravano. Nive 


(490 


je nebo neni_ignorovano 


Sati 


Nitove ae i ada 

Wane EXITATR Neobsahuje Zadné parametry. Je-li zaddno klicové slovo ENTRATR, predpoklada 
ATR normalni zobrazeni. Jinak je klicové slovo EXITATR ignorovano. 

why 

Yeti “s 

Fauti y 


arg slové EXITATR zadany atribury HI, RI a UL, je vysledek rovnocenny zapisu 
1 tj, nezobrazovana data. 


slovo EQJCT: 


Fitangte "fr 
format" ner " o : . 
Ornat" Vv kligovem slové-se musi shodovat s nékterym z identifikatnich kodd ystupnich 


PFiloha 5. Chybové zpravy prekladate DE/RPG 5-49 


f td (sloupce 8 a 9 prikazu pro vstupni fkormat). Parametr "format" je ignorovan. 
orma’ 


kligového slova ENTRATR: 


Parametr "jméno” kliového slova WRITE musi byt jmeno zaznamu popsaneho v ramci transakenino souboru 
e 4 
(TFILE). Kligove slovo je ignorovano. 


Apaelres Ae . 
Obsahuje-li klicové slovo EOJ parametry eer a ear zat arecet ote oft bal Kone 
é ketového souboru, které je zapsano v navesti + Par a (ji 
anes apostrofech) fete proménna (jméno pole). Je-li prvnim parametrem *PASS, pak musi byt 

parametrem jedinym. 


Stredni 
VSechny parametry jsou ignorovany. 
Stredni 


yt treti y treti 
Jsou-li v klitovém slové EOJ zadany tri parametry, musi byt tretim parametrem #PASS. Zapsany 
parametr je ignorovan, 


ore 

Je-li zadan prvni parametr (jméno souboru), musi byt zadan i druhy (adresa zarizeni). 
0728 _V EOJ chybi druhy_parametr; véechny parametry ignorovany 

StFedni 

Je-li zadan prvni parametr (jméno souboru), musi byt zadén i druhy (adresa zarizeni). 
G730___Pryni_paranetr_y EQJ je #PASS; ostatni_jsou ignorovany 

Stedni 


iS Pace en E ako prvni 
Je-1i zadan parametr #PASS, musi byt zapsdn bud jako treti (za jménem a adresou), nebo j 


a jediny parametr kligového slova EOJ. 


PS-5O DE/RPG ~ Popis jazyka 


mo? 

td 

Prikaz pro vstupni format s testem na typ formatu je ignorovan z Jednoho z téchto divodd: 

- nasleduje Za prikazem pro specifikaci Ulohy, : 

- pdsleduje za prikazem pro vstupni format, ktery oznatuje podprogram (jméno podprogranu y fubrite 

"Jeeno", Z Pe . : 

- rubrika "Testovana pozice” (presnéji sloupce 23 az 30) Je praézdna nebo Obsahuje neplatny 2apis. 
1_forma’ 

ptikaz_ignorovan 


Stiedni 


Prikaz pro prohlizeci format je ignorovan, protoze rubriky 
% az 30) a "DalSi format” (sloupce 45 a 44) jsou prazdné n 
pozice musi mit tvar #PO0Sn, kde n je Cislo pozice v zdznamu 
dva znaky, z nich prvni je pismeno a druhy Cislice, 


"Testovana pozice” (pFesnéji sloupce 
ebo obsahuji neplatné daje. Testovana 
+ DalSi format musi byt zadan bud jako 
nebo jako Cislice v pryni pozici rubriky, 


piikaz_ignorovan 
Prikaz pro prohlizeci format (sekundarni fadek) je ignorovan, protoze sloupec 22 


(logicky vztah "a”), ale pfedchoz: p*ikaz byl prikaz 
prohlizect format. 


je vyplnén kédem A 
pro specifikaci tlohy nebo neplatny prikaz pro 


uji_neplatny dda} pro. prohiizec: 


Piilaz pro prohlizeci format je ignoravan, protoze rubrika "Dalsi format" (sloupce 45 a 46) je 
azind nebo obsahuje neplatny tidaj a dalsi prikaz neni sekundarni Fadek s kodem A ve sloupci 22 


Uogicky vztah "a"), 
inény_prikaz pro prohlizeci forméty_ ignorovén 

Stedni 

Piitaz pro prohlizeci format je i 


(rubrika “Podminky" je prazdna), 
by se mikdy neuplatnil. 


gnorovén, protoze neobsahuje test (podminku) pro vyber formatu 
ale za nim nasleduje dali prikaz pro prohlizeci format, ktery 


Yh Prikaz pro pr 


ci formét odkazuje na nepripustny vstupni formdt; prikaz ignorovan 
Stredni 


Fithar Pro prohlizeci 


E format je ignorovan, protoze rubrika "Daléi format” obsahuje identifikacni 
Od vstupniho formatu, 


V jehoz specifikaci je zapsdno klitové slovo WRITE(#NO). 


Priloha 5, Chybové zpravy prekladace DE/RPG P5-5i 


Kazdy vstupni format musi mit jedinecny identifikacni kod. Platné kody jsou 1 az 9 a AO az 29, 
Identifikatni kéd je ignorovan. 


Jméno ve sioupcich 10 az 1? prikazu pro vstupni format musi byt bud »meno zaznamu /)avesnice/obra- 
zovky nebo jmeno podprogramu uvedene v prikazu BECSR. 


2 


V prikazu pro vstupni format musi byt rubrika "Opakovani" (slouprc 20! prazdna, jsou-2i prazdné 
rubriky "Format" (sloupce 8 a 9) a “Jmeéno" (sloupce 10 az 17). Uda} v rubrice "Cpakovani" je igno- 
rovan. 


V prikazu pro vstupni format, ktery obsahuje jméno podprogramu v rubrice "Jméno" (odkaz na prikaz 
BEGSR), musi byt v rubrice "Qpakovani" (sloupec 20) zapsan kod 1. Je-li tiday ve sloupci 20 prazdny, 
Neprovadi se Zadna akce, je-ii neprazdny, dosadi se 1. 


Uda) v rubrice "A" (logicky vztah "a") - sloupec 22 - Mepiat: v ofzkazu pro vstupn: format. Uda} 
je ignorovan. 


V prikazu pro vstupni nebo prohlizeci format se testovaci pozice (je-li zadana) zapisuje ve tvaru 
*P0Sn, kde n je cislo v rozsahu 1 az délka zaznamu transakéniho souboru (TFILE). 


PS-52 DE/RPG - Popis jazyka 


76h Pro odkaz na BECSR nesmi byt zadéna podminka 


Sifedni 


 pfikazu pro vstupni format, ktery obsahuje jméno Podprogramu v rubrice "Jmeno" 


HeG6R), must zistat sloupce 22 aZ 37 (podminka) prazdné, Neprovadi se 3édnd akce {odxaz na prikaz 


7bt_Relace ve sloupcich 33 a 34 je ignorova 30_prdzdng 
Stfedni 
Neprovede se Zédna akce. 

pers 30_jsou_ignorovény 


Jeli rubrika “Testovaci znak" (sloupce 36 az 37) prazdnd, musi byt prazdna take " 
vand pozice" (sloupce 23 az 30), ’ yt prazdna také rubrika "Testo- 


(77 _Testovaci_znak (sloupce 35 a 37) _je ignorovan, nei 


Neprovede se Zadna akce. 

MB_ltentifzhatni kéd ve sloupcich 45 a 46 (dali formét) neni definovin 

eet kod v rubrice “Dalsi format" (sloupce 45 a 46) musi byt definoyan zapisem v rubrice 
en ae 8a) nektereho prikazu pro vstupni format. Je-1i chyba zjisténa y prikazu pro 

5 1 J ignorovan identifikaéni kod, je-li chyba z3:Stér Pikazy ize = 
"i ae ea y stena v prikazu oro prohlizeci for 

Wb _Nezadin dai3i form, 


k ti , Taye eee 
Sli v prikazu pro vstupni format prazdné obé rubriky "Format" (sloupce 8 a 9) a "Jméno" 


‘pres 5 e r . ~ F 
on eae 10 aZ 19), musi byt zadan bud dalsi format (sloupce 45 a 46) nebo EOJ (ve sloup- 
% 80), Neprovede se Zadné akce 


om j A 

wil Nezadi 23_az_30_}sou_vyp!nény 
Siredni 

Jeli v prix 
Gals format 


Th tadin dats format; EQJ 


“ia vstupni format zadana testovana pozice (sloupce 23 ai 30), musi byt zadan bud 
upce 48a 46) nebo EQJ (ve sloupcich 55 az 80). Neprovede se Zadna akce. 


Teli zadsne (1s, 
ino k} f eke, 2 « 
itove slovo EQJ, nesmi byt zadan dalsi format (ve sloupcich 45 a 46). 


PFiloha 5. Chybové zpravy prekladate DE/RPG P5-5S3 


Strednt 


tery obsahuje jméno podprogramu ve sloupcich 10 az 17 (odkaz na 


ri tupni format, k i . 
ee Nl lasagna ged { format (sloupce 45 a 46) nebo EOJ (ve sloupcich 55 az 80). Ne- 


BEGSR), musi byt zadan bud dalé 
provede se Zadna akce. 


y 


Rubrika “Volby" (sloupce 55 az 80) v prikazu pro vstupni format musi byt prazdna, jsou-li prazdné 
rubriky "Format" (sloupce 8 a 9) a "Jméno” (sloupce 10 az 17) a je-li zadan dalsi format (sioupce 


45 a 46). Zapis v rubrice "Volby" je ignorovan. 


cich 55 az 80 neplati 


Jsou-li v prikazu pro vstupni format udaje “Format” (sloupce 8 a 9) a “Jméno" (presnéji sloupce 
10 az 19) prazdné, musi byt v rubrice “Volby" (sloupce 5S az 80) zadano jen klicove slovo EOJ. 
Jina kliova slova jsou neplatna a }sou ignorovana. 

ransaktniho sout klavesnice/obrazovka 


Pole v zaznamu klavesnice/obrazovky musi odpovidat presné (jedna ku jedne) polim v zazramu trans- 
akéniho souboru. VSechny odkazy na tabulky musi pouzivat stejny pocet polozek a odkazovat na stej- 
né tabulky. 


0802" __BURING IGF NTS/#FHTU)S plat jen’ u'disketoveho! souboru 
StFedni 


Kligové slovo BLKING je ignorovano. 


V rubrice "Délka" (sloupce 30 az 34) prikazu pro popis souboru musi byt zadana délka logickych 
zaznam) obsazenych ¥ souboru. Neprovede se 24dna akce, ale nevytvori se prelozeny program. Tato 
Chyba mize vyvolat dalsi chyby. 


PS-54 DE/RPG - Popis jazyka 


Platnd délka je 1 az 34 prikazu p 


Viz zprdve =. 0804, » Pro‘ponis souboru. Délka je ignorovana 


\ prixazu pro popis souboru nema zénis v rubr at if 
it yP dat” (sloupec 
yp dat" (sloupec 35) smys}, 


(807 _Desetinna aista 


ignorovana 


7apis v rubrice "Desetinna mista” 


(sloupec 37) smys!, 


+azu PFO popis souboru nemaji zdpisy v rubrice "Pozice" (sloupce 39 a3 44) 


sadi se 20 


Yelka zaznamu pro prikomp2) 


Ované tabuiky nesmi of C2 
rere Ky nesml oFekrotit 86 pozic, 


Drotoze data sou zadana 


Ulta tabulkove polozk 


mus t a ci Bt 
nivity "Délka®, oe wsi byt neprdzdna, Ciselna, vetSi nez 


0 n 0 a zarovnana ey i 
ne polozky mohou byt dlouhé nejvyse eee cit 


15 pozic, znakové palozky nejvyse 256 


Teallové dat povaz 
a data se povaiuji za Zznakovd, 


dosadi se 0 


PEt deset inn 
fresal byt vai 
4 dyla-} 


(a3 
a Stys!j_ignorovan 


veh mst (Sloupec 37) smi 
tSi nez tato délka, Dr 
1 Zadana délka, 


byt zadan jen tehdy, je-li zadana delka (sloupce 20 az 34! 
OSaci se pocet desetinnych mist 0, ale tento uday plat? jen teh- 


To cat (Sloupec 35) neniet «2: 
neplati v prikazu pro Popip tabulky. 


PFiloha 5. Chybové zpravy prekladate DE/RPG PS-55 


{" (sloupec 38) neplati v prikazu pro pop:s tabulky. 


lapis v rubrice "URI tt 


Pozice (sloupce 39 az 44} neplati v prikazu pro popis tabulky. 


ogi $.uéitin B musi_pjt zadéno_jné 


Stiedni 
Je-li zadano uzit{ B (obousmérné), musi byt zadéno i jméno ve sloupcich 19 az 26. 


Kazdy zaznam musi byt pojmenovan,aby se na néj mohlo odkazcvat. Tato chyba vyvole dalSi chyby. 


Stedni 
Desetinnd mista (sloupec 37) neplati v orikazu pro popis zaznamu. 


082i _Pozice nema sm) 


ignorovana 


Pozice (sloupec 37 az 44) neplati v prikazu pro popis zaznamu. 


Délka_je neplatna 


q 
Délkovy tidaj pro pole/klié musi byt v rozsahu 1 az 256. Udaj je ignorovan. 


0823 Desetinna mista zaddna, délka > 15; desetinna mista ignorovana 


Stredni 


Pole se povazuje za znakove. 


0824 


Stredni 


Desetinna mista neplati bez délky ve sloupcich 30 az 34. Pocet desetinnych mist nemize pi 
a nesmi byt vét3i nez délka. Protoze se dosazuje 0, pole se povazuje za ciselné. 


PS-S6 DE/RPG - Popis jazyka 


esahnout 9 


Fracovni pole musi_byt _pojmenovano 


Prikaz je ignorovan. 


tna; 


Delka_je neo ignorovana 


V prikazu pro popis zaznamu plati délkovy ddaj jen u komunikatniho souby 
Oru. 


(27_#RIN plati_jen_na_popisu pole; #RTN ignoravano 
Stfednd 
Tipis #R1N plati jen na prikazu pro popis pole (i kdyZ nepopisuje zadné pole) 


1)_U RIN neplat 


delkaj_ignorovana 


Hol UARIN neplati desetinnd mistas ignorovana 


Stredni 


_UARIN neplati uziti; ignorovéno 


Stfedni 


Stredni 


This y rubrice "UZiti 


ne " (slot 4 
W), Oday usiti ieevSal upec 38) ma sm: 


Sanolnnpi( neo ysl jen pro klavesnici a Obrazovku, vyjma pracovni pamet 


bore 3 jevu j “ ve 
Medien Zprava se objevi, ie OMT zprava) na disketovych a komunikatnich sou- 
tn ern a je jiné nez - e 

* 0 prikomp;} gas Dez Oy 


*Ovanou tabulku a je jiné nez W, 
Jen informaéni a neovlivni vypotet. 


"do aprava je 


Param se neprelog 
Neprelozi. Tato chyba vyvold dali chyby. 


PFiloha 5. Chybové zpravy prekladate DE/RPG P5-57 


zacina TAB nebo 


\V prikazu pro popis tabulky musi byt zadano jméno i délka. Jméno nesmi zacinat TAB. Prikaz je igno 
y 
p o 


rovan. 


y 


Sti 


oe 


5 


Je-li v pfikazu pro popis pole (v sekundarnim radku) zadan indikator ve sloupcich 9 a 10, musi byt 
zadano bud kligove slovo CHECK nebo klitove siovo ERROR. Indikator ye .gnorovan. 


p42 _Chybna_pozice; ignorovana 
Stiedni 


Pozice pole na jinem souboru nez klavesnice/obrazovka sai byt tislo od t do 8192. Na klavesnici/ 
Jobrazovce se pozice zadava dvéma Cisly v rubrikach "Radek" a "Sloupec”. 


ek) _CHECKAD)_a SUBST_jsou nesluéitel 


Stfedni 


Klitove slovo CHECK(AD) kombinované s klicovym slovém SUBST by davalo nepredvidatelne vysledky. 


ven slové INSERT _je delSi_nez 


la byt deléi ned 1 
Data dosazovana klicovym slovem INSERT do pole by nenéla byt deli nez toto pole. Je-li pole 
Ciselné, je zarovndno podle desetinnych mist. Prebytetné znaky jsou ignorovany. 


K(BY/BV) j paranetr” ignorovan 


ve Licove slovo 
Sekundarni Fadek (s indikatorem ve sloupcich 9 a 10) prikazu pro popis pole obsahuje kli 
CHECK s jinym parametrem nez BY nebo BV. 


PS-5SB DE/RPG - Popis jazyka 


Jeli v prtkazu Pro popis pole zadan indikdtor ve 
jedinym dalsim zapisem klicové slovo CHECK (BY) nebr 
vanas 


sloupcich 9 a 4 


0 (sekundarni 7, 
0 CHECK (BV), prearnt Fadek) 


4 ‘mu: y 
Ostatni kligovg slova jeans 


J50u ignoro~ 
0853 CHECK(RL) nesi 


ati 


Kiitove slovo CHECK(RL) nep 


lati 5 jinym typem dat nez V nebo W (ve sloupei 35) 


Agnorovan 


farametr RL (vkladdni zprava doleva) neni slu 
Citelny s par, ani 
wezer) ani § parametrem RZ (zarovnani vpravo 5 dope ree Reel enainin Wpravo s doplnénin 


(855 CHECK(MF) nes) 


Faranete MF (povinnd Zaplnéni pole) 
zr) ani s Parametrem RZ (zarovnan 


(Sh Che 


—- 


neni slucitelny s Parametrem RB 
n 8 B (Zarovnani vpr, iné 
1 vpravo s doplnénim nul), ari 


e1ne; 


Sel 


Fermetry RB (zarovnai 
3 tadény zéroven pr 


2 


IM vpravo s do; 
© totez pole, 


plnénim mezer) a RZ (zarovnani vpravo 5 dopnénim nul) nemohou 


Inorovan 


19 


a C (znakova kont 
am meZer) ani pa 
ONY leaze prikazy, 


rola) v prikazu pro popis 
ikazi pole, neplati pa it 
rametr RZ (zar, Ine D elitovéa 4 


: zarovnani 
Ovnani vpravo s dopln 


enim nul) klidového slova 


Water Ag (automat icky 
Né duplikace . 


el) klicového slova CHECK nemize byt zadan zéroveh s kliovym slovem 


PFiloha S. Chybové zpravy prekladate DE/RPC P5-59 


0860 _CHECK(AS AD) neslucitel 


4 byt zadany zarove pro 
AS (automaticky preskok) a AD (automaticka duplikace) nemohou by 
Parametry autor 
totéz pole. 


086! CHECK (Mxx G: 


Stfedni 


ritmu samokontri Gxx (generace kontrolnich znaki samokontro- 
Parametry Mxx (kontrola podle algi gi ‘ontrol 

joritmu samokontroly) a 

y) ne fou byt zadany zaroven pro totez pole. Mize byt zadan jen jeden z nich. VSechny paranetr: 
ly) nemo! zal z y 
jsou ignoyovany: 
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ogee _Konstanta neplati_pro TFILE 


Xonstanta nemize byt zadéna v ramci 


(86h _ Kor lutitelnd s délkou; 


Nonstanta a délka (sloupce 30 a3 34) 
QibS_CHECK(RB/RZ) nesluci 


transakéniho Souboru. Je ignorovana, 


nesméji byt Zadany soucasné, 


V poli délky 1 nemdze byt zadano Zarovnani vpravo, 


Wil _Jediné kLigové Slovo na_tomto 


Jeli kligove slovo ERROR 
jedinya Klicovym slovem 
(7 Vysty 


(8) _TADD nes 


Stredni 


L198 nesluéi 


é se SUBST, 


? P ve ee 
Fi pro pole zadano kligové Slovo SUBST, 


~———Reslucitelné se SUBST; TADD | 


eli pro pole Zadano kli¢ové slovo SUBST, 


ku musi byt ERROR; 


Podminéno indikétorem ve sloupcich 9 a 10 (sekundarni Fadek) 
Zadanym na tomto Fadku. 


» Musi byt 


pn fete wisi ait jméno nebo konstantu 


Wstupni pole musi Specifikovat data. Pole Je ignorovano. 


+ ADD, ARRATR, AUXST, DSPATR, EXSR, 
‘Ova jsou ignorovana. 


neplati klicové slovo TADD. 


=e 1i_TSUB_ignorovano 


» Neplati kligové slovo TSUB, 


Pracovni pole nemize byt zobrazeno, Cteno ze souboru ani zapisovano na soubor, proto nema zapis 
jeho pozice zadny vyzZnam. 


Program je priliS velky. Musi byt prepsan nebo rozdélen na casti. 


Delka a desetinna mista se musi shodovat s predchoz2 definici pole 


Po)menovand proménna (pole) je definovana nékolikrat. Atributy promenne (délka a pocet desetinnych 
mist) musi byt definovany pokazdé stejné. Pouzije se predchozi definice. 


Komoinace imp citnich definic poli 


Nedefinované jmeno pole v klicovem slove LOOK, RANGET, SUBST nebo AUXST zpisobi implicitni defi- 
nici jména pole. Implicitni definice stejného }mena pole musi souhlasit v delce a poctu desetinnych 
doplfuje implicitni definici shodnow s definici pole, pra nez je toto 
ntrolovana definice neni shodna s dfivejs:, klicove siovo je 


. Kii€ove siova AUXST 
klitove slovo zadano. Protoze prave 
ignorovano. 


Klicove slovo AUXST obsahuje nedefinovane jmeno jako parametr "cil". Prekladac tomuto jmenu priradi 
implicitni definic: shodnou 5 definici pole, pro néz je kliccve slovo AUXST specifikovano. Parametr 
"cil" by mél byt rad@ji jménem definovaneho pote. 


Soubor nesmi mit stejné jméno jako zaznam nebo jiny soubor. Zaznamy nebo tabulky zadané pro tento 
soubor se priradi k predchozimu souboru, je-li pritomen. 


}_ignorovano 


Taznam nesmi mit stejné jméno jako soubor nebo jiny zaznam. 


PS-62 DE/RPG - Popis jazyka 


7e3_Prekroten naxindlni pocet_so 


Soubor $ prikompilovanymi tabulkami smi 
razovky) sui byt nejvyse 14, Vicedisketov 
za jeden. Vicedisketovy soubor rozmistén 
je zadano paranetrd "adresa" v kligovém 
souboru je ignorovan, 


byt nejvyse 127, 9, 
Y </« Ostatnich soubo; 
so ; rd (krom 
ue ais zakladany postupné do eae oh ‘lavesnice/ob- 
nekolika jednotkach Se pocitg Otky se pocita 
slové DEVICE pr ika eA 


Bali 1k 
ZU pro popis souboru, Prixse roe? Kelak 


Fikaz pro popis 


gnorovan 


Popis zaznamu nesmi nasledovat z Pikazem or t 
f 2 prikazem pro pop 
mM py 1s tabulky (T ye sio 
' loupei 17) 
(RG Pole musi nasledov. 


platnym copisem Zaznam. 


0 pele 


Popis pole je ignorovan. 


bsahu jicim tabulkus ignorovano 


Prikaz pro Popis pole nesmi nasledovat 


: Za prikazem pro Popis tabulky (T ve sloupci 17) 
2] Tabulka JE neplatnd v souboru obsahujicim i 


Prikaz pro Popis tabu f 

1 A : 

ky nesmi nasledovat za prikazem pro Popis tabulky (T ve Sioupci 17) 
Zarizeni; klié z 


: menen na pole 
Stredni ae 
sees 


Kitove i by 4 
pole smi byt zadano Jen na disketovem soubory - 


ia] 


DEVICE (DISK) y prikazu pro popis souboru, 
= _Tabulka neplat { pro tento 


Tibulka sai py ; 
Bis iret Popsana jen v r4 ae 
WE KLiC0v8 slovo DEVice ayhee Souboru, u néjz je zadino klicové slovo DEVICE(DISK) nebo u 


"popisu sou 
boru odpovid . 5 
BRUTE (tiskay ene 


a Covemu slovu TFILE (transakeni soubo: TLE 

8 s ir), CFILE (koprrovaci 

y Pens SFILE (soubor produkénich statistik) nesm: byt zadana vice 

is Seta slove DEVICE, Definice Souboru je ignorovana, Zaznany nebo 
JsOu prirazeny k predchozimu Souboru, je-li pritomen, 


Jetha adresa zap 
zi 
Labulky definované y ae 
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Nedefinovane jmeno souboru je ignorovand. 


0924  Sousor v klicovem slove SHARER neni_definovan 


Nedefinované jmeno souboru je ignorovano. 


nést_SHARE 


0935 Zadané zarizeni_nendze 


Kliove slovo SHARER je vice omezujici nez SHARE a obe nemohou specifikovat stejny soubor. 


zaznamuj_ignorovano 
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0747 __Prekroten maximalni potet tabulek 


V programu smi byt definovano nejvy5e 127 tabu) 
2 lex. 


Definice ¢ 
O74 Maximalni_potet_tabulek pr Acces 


V programu smi byt definovano nejvySe 127 tabulek 
2 ek. 


Index druhé trovné neni definova 
n. 


Seznam parametrd musi Obsahovat alespoh Jeden plat 
a 


"Y parametr (pF ikaz PARM) 


U prikazd BECSR, ENDSR a TAG musi 
; ‘ Pte Si byt jedinetng NaveSti. Jméno PFikazu P| 
2 ZU PLIST nesmi du 
Plikovat 


Jnéno musi byt jménen 4a "4 * 
é 
byt j Zaznamu na k Vvesnici/obrazovce nebo jménem Podprogramu 


F Be apes won, 
ole musi byt bud predem definovano nebo musi it 
2 om 


Zadanou délku (a dese? 


Inna mista, je-1i Eicetng), 


Tadanéjné { 
MO MUSi oZnatovat dX, 
lefinované pole. prj, 
+ Prikaz je ignorova 
an, 


hybneho typus_ignorovén 


Jeén0 ausi by Fedem a Fikaz 
Yt predem def ino ano a jeho t musi by F 
Preder f yp I byt y 6 i 
yt v daném pFikazu povolen, 


Tadang meno enar . 
J MUSi oznacova ane PFikaz rovan. 
t definoy, é po Z je ignorovan, 
2 ai 


Priloha 5. Chybové Zpravy preklddace DE/RPG P5-65 


io typuy 1gnor 


Jméno musi byt bo 
musi byt v daném prikazu povolen. Prikaz je 1gnorovan, 


0966 — Jméno lefinovano nebo je chybn 


Zadané jméno musi onatovat definovane pole. Prikaz je ignor! 
selna konstanta. 


lefino 


u CTDATA nebo FTRANS 


0957___Jméno_soub 


Jméno musi oznacovat definovany soubor. 


o_v CFILE neni _definovéno _nebo_je_chybného typ 


Jméno musi oznacovat definovany soubor. 


0970. Jméno v PRIFILE neni_definovéno nebo je chybneho_ 


Stredni 


Jméno musi oznacovat definovany soubor. 


O71 definovano_nebo_je chybného_typuj. 


Stiedni 


Jeno musi oznacovat definovany soubor. 


Stredni 


Jméno musi oznatcvat definovany zaznam. 


Stredni 


Jmeno musi oznatovat definované pole. 


0974 __Jméno_v SUB neni _definovano nebo je chybného typu; k} 


Stredni 


Jméno musi oznatevat definované pole. 


PS-6& DE/RPG - Popis jazyka 


predem definovano nebo musi mit zadanu delku (a pocet desetinnych mist) a jeho typ 


0975 __Jnéno_v AU! 


Stredni 


bo 


18_chybného typu; 


Jnéno zadané jako parametr kligoy, 
je klicové slovo zadano, 


licového slova AUXST musi g 

ausi byt Fadné delice Oznacovat def inovang Pole; nebo pole. 

; D pro nez 
O70 v COMP 


stFedni 


Jnéna (jména) musi oznacovat definované (des 


0978 _Jné 


inovana) pole, 


¥ LOOK neni_definovéno nebo je 


us Druhé jméno, je); zadano, musi oznacovat definova- 
r) ’ Vi finoy, 
9981 Jnéno_v RANGE nen: 


Ove Slovo _ignorovano 


Jnéno ( jmé i c 
jmena) musi oznacovat definované (definovand) pole 


782 _Jnéno_v RANGET 


neni_definovano nebo je é norovano 

a ee nee rem eneranee, ch bného i é i i 
ns AE _Chybneho typuy _k1i Ove slovo_ignorovéno 
aoe 


Pryni jméno. my i oznagovat def a ri 5 ef\-ns 
ryn Si oz; novany he m ri no 
fe: t definovanou tabulku. Druhé jmeno, je-li zadé { 
’ “1 Zadano, musi oznatovat defj 
ni t 


Peni dvé jné 
Ye jmena musi rd . 
nované pole, $1 oznatovat definované tabulky. Tret{ jméno, je~ 
' 


li zadano, musi oznacovat defi- 


Priloha 5. Chybové Zpravy prekladace DE/RPG PS-47 


ove slovo_ignaravano 


4 dvé jmena mu: 
oznacovat definovane tabulky. Druha dve } 
mi dve jmena mus: Oz! 


norevano 


ove sic 


gnerovano 


neni-ii jménc programy vyjad*eno konstantou. 


} 
Jmenc musi oznacovat definovane pote, 


09g? 


1000: AD nen 


s tiselné le. 
vo ADD plati yen v p¥ikazu pro popis ciselneho po 


)D_ignorovano 


ici parametru k 


ADD zadano, je deici + 


1002 __ SUB _neni_u cise 


P5-48 DE/RPC - Popis jazyka 


si oznatovat definovana pole. 


1005,_Pole s SUB je des 


Stredni 


Pole, pro néz je klicové slovo SUB zadsn 
slova SUB. Neprovede se Zadna akce, 


0, je delsi nes pole Odpevidajici Parametra k}igovehy 


nex 


Je-li klicovym slovem INDEX urzen adresni index, 


J& parametr 
rovan. 


"pamat" neplatny. Parametr 


j@ igno- 


1007 _INDEX musi oznacovat_jmé 


Je-li pouzit adresni index, musi byt parametrem kliCevého slova INpEY jméno sou! 
dexem. KliCove slovo je ignorovano, 


byla_po 


ita neCiseina data 


Je-li jako druhy parametr kli€ového slova COMP 


zadan vyraz, 
proménné, konstanty) Ciselnd. K1i 


h must byt data pouzité ve vyrazu (pole, 
iicove slovo je ignorovano. 


1009 PRIFILE a CFILE newohou obsah 


nice zaznani/poli 


stn 


Definice zaznami a poli nemaji 
a )sou ignorovany. 


i vyznam na souboruch tiskovych (PRTFILE) a kopirovacich (FILE) 


Kitove Slovo FORM plati jen na ScS- 


Souborech, ne na tiskovém souboru oznateném v klicoven 
Ve PRIFILE 


Slo- 


wes 


Kiitové stove Seo testuje jen prynich 16 pozic pole kontrolovaného na pofadi. Tato zprava se objevi 
Jen tehdy, je~1j Celkova délka pole vété{ nez 16 pozic. 


Soubor Uvedeny y 


Soubor § adresnim indexem. K1idové slovo INDEX Je proto neplatné a je ignorayano, 


klicovém sloyé TFILE, CFILE, PRIFILE nebo SFILE nemize by! soubor s klicem an: 
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ndex v LOOK je chybny 


Druhy parametr klicoveha slova ERROR - ‘text 


1015 Pole musi byt Ciselne, 


e-1: typ dat 


Parametr "index" klicového so 
je ignorovan, ye TOOK sus) byt Ciselny 5 Nulovym pog 
Poctem dk 


* eS Mi ’ 
Stredni Stnnjch mist. Paranete 


Zhuéténa dekadicka (P) a bindrni (B) pole musi byt definovana jako Ciselna. 


Ostatn{ j 


i ies. Snoravany 
| Typy dat P a B neplat: na klavesmici/obrazovce, na t:sk ovych scuborech 3 na scubcrech TFILE 2 SPIE. wad, 
1 Neplati take u odkazd na tabulku. aia csilany 

aznam zadany pro soubor Statistik 
nlati byt zadano jen jedno zéhlavi, (SFILE) je Zahlavi soubory 
\ . 


Pro kazdy soubor Statistik ndze 


2 pro pole delsi nez 9 crslic. 


pouzita necise.na dat 


Je-li jako parametr k 
proménne, Konstanty! 


INSERT zadan “yr. 


stove je ignor 


e ve vyrazu (pole, 


wont 


Elen’ vyrazu ma deiku vetSi nez pole, pre néz je kliccve sicve INSERT zadano. 12 
zprava nezahrnuje pripad, kdy Cleny vyrazu maji steynoe delku jako zminene pole. Neprovede se ze 


fa akce. 


Ion 


OSON neni _znakove pole; LOGON 


Stredni 


Parametr kiicovene slova LOGON mus: byt bud znakova konstanta (uzavrena v apostrofech) nebo 


jmeno znakoveho pole, ktere@ obsahuje pr:hlasovaci informaci. 


118 mnoho polozek 


Pocet polozek udany v parametru k}i€oveho slova ARRATR aresahuje cell 
lozek. Pouzije se pocet polozek 2 k!:€oveno slova NUMENT odpovidajiciho 


ejneho typus klicove:slovo. igncrovanc 


Tabulka zadana v klicovém slové LOOK musi byt stejneho typu (znakaveho ne 
pisované pole. 


PS-70 DE/RPS - Popis jazyka 


PFiloha 5, Chybové zpra 


Wy prekladate DE/RPG ps-7) 


1026 
Stredni 


Povinnym parametrem klicovéno slova RANGET je jmeno tabulky, ktera obsahuje dvojice polozek oznacu- 
yicicn dolni a horni meze rozsahi hodnot. V tomto prioade se typ popisovaneho pole a této tabulky 


neshoduje. 


Fabulka zadana v \Jidovem slové RANGET musi obsahovat dvojice palozek oznatujicich dolni a horni 
meze rozsah’ hodnot. Kazda dvojice musi byt Uplna, coz vyzaduje sudy oocet polozek. Neprovede se 
zadna akce. 


Je-li zadan parametr "index" v xlicovem slové RANGET, musi oznacovat Ciselnou proménnou s nulovym 
poctem desetinnych mist. Tento parametr je ignoravan, 


Je-li disketavy soubor oznaéen jako soubor s kli¢em, mize byt pro néj v klicovem slové DEVICE za~ 
dana jen jedna adresa zarizeni. 


1030 Parametr vy RESET neni Ciselne j_RESET ignorovano 


Pole s edici data m 


Stredni 


Diskety, obsahujici indexovy soubor a Casti datoveho souboru, musi byt zalozeny v jednotkach jiz pri 
otevirani souboru. 


Strednt 

Povinny parametr "tabulka2" klicového slava SUBST musi oznacovat tabulku s polozkami obsahujicimi 
data dosazovana do pravé zpracovavaného pole. V tomto pripadé polozka a pole nejsou téhoz typu. 
Kli€ove slovo SUBST je ignoravano. 
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Dela prvni tabulxy musi byt 
mensi nebo rovna delce pole, 


1036___Tabulky v 
Stiedni 


Parametry "tabulkai” 


polozek @ "tabulka2" ; 


kliového slova SUBST musi oz 


Y 


Nepovinny parametr "index 


desetinnjch mist. Parsmety Si Coveho slova SUBST 


J€ ignorovan, 


Delka napoved i presahuje 
do népovedni ho Fadku, 


Nliéové stove you 
* XCHK umozi) 

lodek, Kazda 2NUJ@ porovnavat hod, Send 
BN V0} f hodnoty obsaz ; 

8 Zita ake, © 'DUKovych polozek musi byt aaine oy IiC: Poli § dvojiceni tabulkovych po- 


yt lipina z ¥ pot 
yt uplna, coz vyzaduje sudy pocet polozek, Neprovede 


sulkOVych polozek nesmi press 
OYt Ciselng Znakove, Presahnout’ 15 pozic, i kdyz argumenty zadané v kliovém slové xc 
slove XCHK 


Priloha 5. Chybové Zpravy prekladace DE/RPG PS5-73 


ti na souborech, xteré obsahuji prikazy pra popis Zaznamu. Tabulky nesméji 


Definice tabulek nepla 
o TFILE, SFILE, CFILE nebo PRTFILE. 


byt definovany na souborech oznacenycn jak 


Jako jméno pole, jenoz obsan lze ménit, bylo zapsano UDATE nebo #STATon. 


pole 


1047 _*T0Tn smi_byt_gouzito jen jako}! 


Stredni 


Jeno je ignoravano. 


8 


1051 


§ 


Povinny parametr “zdroj" klicoveho slova AUXDUP oznacuje pole, jehoz typ se neshoduje s typem 
rave zpracovavaného cole. Klicové slovo je ignorovana. 


4052___Parametr_v AUXST nema stejny typ jako pole 


Btiedni 


Povinny parametr "cil" kligového slova AUXST oznacuje pole, jehoz typ se neshoduje s typem prave 
zpracovavaneho pole. Klitové slovo je ignorovano. 


1053 


Stredni 


Druhy parametr "data" kli€ového slova COMP nema stejny typ jako prave zpracovavane pole. Kli- 
€ové slovo je ignorovano. 


1054___Parametr_y_ INSERT nemé stejny typ jako pole 


Paramet rem kligového slova INSERT mize oyt jméno pole, konstanta nebo vyraz slozeny nejvyse z 30 
Elen’ nebo o maximalni délce 256 znaki. V tomto oripadé nema parametr stejny typ (znakavy nebo Cl 
selny) jako pravé zpracovavané pole. Kli¢ove slovo je ignorovano. 


P5-74 DE/RPG - Popis jazyka 


$55 _Paranetr_v RANGE nend stejny typ jako 
wannand ty tYP_Jako pole 


Povinné parametry “dolni” a “horni" 


ciselna Ci znakova pole. Parametry a 


Stredni 


‘061 


Prikazy pro 
Pro popis souboru, zaznamu, tabulky nebo poli 
eB, 


definovan Vice nex i 


V rubrikéch 
8 Dro ada 


"Radek" ( 
ny rozmé 
Ma Velikost is s r 
obi by si ape he musi 
razovky, Y S@ nenéla prekryvat a rene’ by byt oat astasied plat- 
r Oluje za- 


Sloupce 39 a3 41) ‘ 


ir abrazovky. Pole by se bee" (Sloupce 42 


az 44) 


P¥i lop Pee 
Filoha 5. Chybové zpravy prekladace DE/RPG PS-75 


Pravé definované pole se prekryva v jedné nebo vice pozicicn s jinym polem tehoz zaznamu. 


Neprovede se zadna akce. 


1075 _K1ié na tomto zazn, 


Stredni 
Soutet delek vstuonich a obousmernych poli je vetSi nez delka zaznamu. 


Prixaz 
4Kaz nedude popisovar klicove 


ky » ale obyéejng fiole 


Plati pro soubor oznaceny jako TFILE, CFILE nebo PRIFILE. 


Pole spada Uiplné nebo zéasti do napovedniho fadku (fadek €. 2 obrazovky). Tato zprava neplati, 
je-li parametr li€oveho slova SLNG v popisu Zaznanu vetsi nez 2. - 
4078 _Souhrnng 


nstanta nemize byt vstupni 


konstanta nesmi byt zadana v zaznamu, ktery }e cten prostrednictvim formulare C. Konstanta je ig- 
norovana, coz mize zpisobit chybné vysiedky. 


a igs ya te 
1070 _Pole na zatizeni _DISK/COMM/FRINTE z Yo tabulky, 
Teka 


fozatecni i kancova pozice pole musi byt menSi nebo rovna délce zaznamu. Pravé definovane pole 
prekracuje delku zaznamu. 


1071 _Fole na _zatizeni DISK/COMM/PRINTER se_pfekrva)i 


Prostor definovany pro toto pole byl uz prideélen jinemu poli (zcasti nebo zcela). Neprovede se 
zadna akce. 


PS-75 DE/RPG - Popis jazyka 


Priloh, é 5 
la 5. Chybovée Zpravy prekladace DE/ppG P5: 


FF 


j_ignorovano 


Torava se vztanuye k Zaznamu ilavesnice/obrazovky Zapisovanemu prikazem WRITE ve formulari C. 
ji ; Zz g 
Piati yen klicova slova EDTCDE, DSPATR a konstanta. 


onstanty, 


5 ‘ 5 
Zaznam na jiném souboru nez i lavesnici/obrazovce by mel obsahovat (pakud Hamer sclct néjaka pole) 
aiespet sah poymenovane poje nebo konstantu. Nemél by obsahovat sama pracovni pole. 


Stredni 


Jano zadané v prikazu *#CTDATA nesmi odkazovat na soubor, U néhaz bylo zadano klicove slovo 
DEVICE. 


1091 Zadano vice zaznamd_nez ava NUMENT 


Malo dat_pro_tento tabulkovy soubor 
Stedni 
Potet datovych zéznami je menSi, nez uddva klicové slovo NUMENT. Tbyva}ici polozky jsou nepouzi tel- 
né, Nejsou-li zapsany Zadne datové zaznamy, tabulka je zaplnéna prazdnymi polozkami (pro znakova 
data) nebo nulovymi polozkami (pro Ciselna data). 
1093___Pro_tento tabulkovy soubor chybi data 


Stredni 


Byla zadana prixompilovana taoulka, ale ve zdrojovém program nebyly zapsany zadné tabulkové 
polozky. 


1094 De 


Stredni 


Pozice urcené pro tabulxovou polozku obsahuji neciselna data. Posledni pozice vpravo smi obsahovat 
dislice 0 az 9 nebo znaky }, J az R, tj. "zdporné Cislice" (odpovidajici cislicim 0, 1 az 9). 


PS-78 DE/RPG - Popis jazyka 


Ostatni pozice téze ta 
nez udava délka vy defj 


bulkove Polozky 
Neprovede se zadnd akc 


nici tabulf 
e, Yy moi 


SMEji ob 


sa 
hou tuto - 


Radek je ignorovan, 


_Rubrika “Opera 


Kady Prikaz formul ar, 
Ridek je ignoravan, 


Ht Neplatny 2épis 


YE vysledku; 


Y aritmeticx 


Ych pr 
ole, Br sKazech Jsou: 


Y Presunavych Prikazech: 
Vaneho pole 
Pole, : 


nomi st ného z 
ZNnakoveho i 
NOMI St ného ree meose (definoy; 


i ane! 
Nakoveho vekt ‘ho nebo novéh 


Oru, By 


are 5 
NC je Systemoyg proméinné 
ey 


air : 
J€jiZ obsan nemize byt y Programu meng 
nen. 


Priloha 5, 


ovat pouze = 
Ze Cis 
chybu zpisobit 2 


Chybove Zpravy prekladace DE/RPG P5~79 


1106__De 


Stredm 


neplati desetinna mista (sloupec 52). Radek je ignorovan. 


Neni-li zadana délka (sloupce 49 az 51), 


1108 __Delk 


Stredni 


Vysledkovy indixator nema Zadny vyznam, protoze se zapne bez ohledu ria vysledek operace. Neprovede 
se zadna akce. 


Tezka 


Podprogram nemize byt umistén v jiném podprograma. Prvni podprogram musi byt ukoncen prikazem 
ENDSR, pak teprve mize zacit dalSi podprogram prikazem BEGSR. 


it V 1, operandu chybi_navesti 


1V 


Prikaz MVR (je-1i zapsan) musi bezprostedné ndsledovat za prikazem DIV, « némuz se vztahuje. Ji- 
nak se zbytek po déleni ztrati. Prikaz je ignorovan. 


PS-80 DE/RPG - Popis jJazyka 


ANIS__Zaokrouh] 


Stredni 


Taokrouhleni je ignoravano, 


V prikazu LOKUP ‘je vysledkovy ; j 
gunenten, Rédek je sanarGvine tkator povinny, Zadava typ Porovnanj 
g Prvkd vekt 


WW vp Oru's hledacim ar: 


‘azu_LOKUP 


Tato kombinace vysledkay 
YCh indikator§ nema z4 
Zadny vyznam, 


118 Chyond bitova mask, 


Stfedni 


Bitova maska se sklads Z Cislic 6 a3 


120 _Chyboy zépis 


Stfedni 


Jednomising Znakové pole nebo bitova maska 


Priloha 5. Chybové Zpravy prekladace DE/RPG PS-1 


"Jaokrouhleni” se dosadi mezera. 


Do rubriky "Z 


1128 __ Rul 


Stredni 


rubriky "Desetinna mista" se dosadi mezera. 


1130___Ind tomto pfikazu neplati 


Stredni 
Dosadi se mezery. 


1131___Indikator_"men: 


Hvezdicka je chybna v jiném jméné nez #TOT1 az #TOT9 a #STATOL az #STAT29. Prikaz je ignorovan. 


Jméno *T0T bez Cisiice je chybné. Musi byt *TOT1 az *T0T9. Prikaz je ignorovan. 


PS-82 DE/RPG - Popis jazyka 


2, operandu prikazu GOTO ch 
ybi odkaz na navagy, 
esti prikazy 7, 


chybi odkaz na navésti of sh 
prikazu BEGSR, Prikaz je fanoreeen AG nebo ENDsr. 


nebo. yanrs 
1198) V2 gperandu je chybny 1 NEDO v prikazu Exgp 
Stiedni 


V2, operandu’ prikazu GOTO 


if WU SUIU je chyb 
je chybny odkaz na navast{ pilkaai percep oor Prikazu TAG neb E 
i ebo ENDSR 


1 N60 V pFfkazy EXSR 


AE ATR a pfedchoziho DIV jsou rzné podatny 
coamnnn nace TEZNE_podninky 


Strednt 


Prikaz DIV a odpovidajici pri 
J1Ci prikaz Mi i 
a aba byly provedeny oohronadé, ress byt podninény stejnou i 
WV. Prikaz je ignorovén. ace MVR by probihala hye ae (ve sloupcich 9 ai 17) 
» Kdyby pred ni eprops ! 
Probehla operace 


Priloha 5. Chybové Zpravy prekladace DE/RPG 5-83 


Neni zadan indikator ko 


Ve lu of azu RE jo READ a it. Prikaz je ignorovan, 
Fikazu Ri READP chybi indixator konce da 
le sJoupcich 58 a 5? prik READ neo y 


indikalor nenaiezeneno zaznamu. 


ho podorogramu musi dyt soucast) seznamu parametrd, t}. musi Lapeate Za prikazem 
$140 t : 1S " Fs a a 
PLIST nebo PARM nebo za prixazem CAL. bez }mena prixazu FLIST v rubrice "Vysiede! 


znakovou konstantu 


agnoeoven 


K prenosu pole do pole slouzi prikazy MOVE a MOVEL. 

1149 MOVE newize presunovat vextor oo steyneho vektoru; 

Stredni 

Prikaz MOVEA mize presunovat data z vektoru jen do pole nebo do }1neho vektoru. 
apEaKed ZBprS 


Zapis v 1. operandu je povinny u téchto privazd: ADD, SUB, MULT, Div, CABxx, COMP, BEGSR, TAG, 


COKUP, DELET, SETLL, CHAIN a PLIST. Frixaz je 1gnorovan, 


-PCAxazu Musi byt zapis 


Zapis v 2. operandu vyzaduji vaechy prikazy formulate C kromé prikazi BEGSR, ENDSR, SETOF, SETON, 


PARM, PLIST a TAG. Prinaz j@ ignorovan. 


PS-84 DE/RPG - Popis Jazyka 


Tapis v rubrice "Vysledek" musi obsa 


ASS 


e e ovat tyt 
NOVEL) HOMER, CABex, BITON, BITOF, TESTE. a pq 


0 prikazy; 
y* ADD, SUB, MUL , DIV, Z-ADD, 7-SuB MOVE 
' ' 


1, operand musi obsahovat data Ciselného typu: 


~ Ciselné pole, 
- prvek Ciselného Vektoru, 
- Ciselnou konstantu. 


an 


2. operand ausi obsahovat data Ciselného typu; 


- Ciselné pole, 

~ prvek Ciseiného vektoru, 
~ Ciseinou konstaniu, 

SS _Wsledel 


Rubrika "Wsledek" musi 
5 Jnén0 Ciselnéno pole, 
> gznateni arvky 

~ Ciselnou konstantu, 


NaveSti a Jnéna poli a tabulek sméjj byt 


obsahovat Zapis pro data 


Ciselného typu: 


diouna 1 az 6 znakd, 


Fikaz i 


Zadana bitovd maska, Mize byt vyjadrena ey 
‘adan . yjadfena cis): 
lakovym palem nebo Prvkem vektoru obsahujicia” 


+ Operand prikazu BEGSR). PFikaz je 


Priloha 5, Chybové zpravy pfekladace DE/RPC PS-85 


A formulari A. Prikaz 
ri ro popis zaznamu na 
jovane Vv prikazu pi 
ymeno zaznamu defin 


2. operand musi oyt 


je ignorovan. 
1170 

= 6 ye 
é operandu tohoto prikazu odkazuje na soubor, ktery nelze pouzit 


5 2 
Jméno souboru nebo zaznamu ve 2. 
v této vstuoni/vystupni operaci. 


2 se fai 
Jméno zapsané v 2. operandu musi byt definovano na platném prikazu pro popis souboru. 
e 2 


1174 Zaokrouhleni_neni_nutne 


1175 __Oba operandy musi byt Eiselné nebo znako\ 


Stredni 
Seite a é é ého. Prikaz je ignoro- 
V i. i 2. operandu musi byt zadana data stejného typu - Ciselného nebo znakoveho. P j 


é i by ano jako Ciselné 
Jmeno pole nebo oznaceni prvku vektoru zapsané v 1, operandu musi byt definovano j} 
5 poctem desetinnych mist 0. Prikaz je ignorovan. 


i mi é klicove pole 
Konstanta, pole nebo prvek vektoru zadany v 1. operandu musi mit ste)nou rae 
definovane v prikazu pro popis souboru, na ktery odkazuje prikaz. Prikaz je igi 


1179___1, operand musi byt poradové ¢ 


‘ é éeni ku vektoru. Pri- 
Poradové éislo zaznamu mize byt zadano konstantou, jmenem pole nebo oznacenim prv' 
kaz je ignorovan, 


PS-@6 DE/RPG - Popis jazyka 


Vv nemz je zapsan, Prikaz je igno~ 


Stredni 


V oznaceni prvku vektoru Je druha Gast - index - vetsi, 


Nez je celkovy pod 
tabulkovych polozek), Y pocet prvkd vektoru (tj. 


1182 Poet deset i_byt_o 


Index v oznaceni prvku vektoru musi byt celé Cislo, proto musi byt jméno pole oznatujici index 
definovano s nulavym pottem Gesetinnych mist. Prixaz Je ignorovan. 


183" _Index_musi_byt ciseing 


Stredni 


Index v oznaceni prvku vektoru musi byt celé Cislo, proto musi byt vyjadéen Eiselnou konstantou 
nebo Ciselnym polem. 


184 _Inéno_vektoru_je zadéno b 
StFedni 


Vina ptikazy LOKUP a MOVEA musi byt jméno vektoru (t]. tabulky) dopinéno Earkou a indexen (porado- 
vym Cislem prvku vektaru), Prikaz je ignoraovan. 


uze_u_jnéna_vektoru 
StFedni 
Prikaz je ignorovan. 


Deni sluditelny s_definici vektoru 


Délka (a potet desetinnych mist) v 1. a 2, operandu musi souhlasit, PFixaz je ignorovan, 


1187__Podpragr. neniize volat sim sebe 


2. operand prikazu EXSR nesmi byt jméno podpragramu, jehoz soucdsti je tento prikaz. Prikaz je 
ignorovan, 


-—-4:_operand musi_byt_prézdny 


Stedni 


V prikazech 7-ADD a Z-SUB nema 1. operand vyznam. 


Priloha 5. Chybové zpravy prekladace DE/RPG 5-97 


Selnaj_paranetr_ ignor 
Stfedni 
Hodnoty parametrd v kligovém slove WEIGHTS musi byt cela Cisla, 
ta yahy_neni_nenéi ne nodnota na 


Hodnoty parametrd v kligovéen slové WEIGHTS musi byt Cisla mengi nex hodnota modulu. 


ch ristup podle kliée, 
i souboru, na nejz nelze uplatnit pris 
méno vicedisketoveho sou' ’ 
Operandu je zapsano }| 


v _Pouz 


Parametr klicového slova OPT se sklada az z 5 znakd, Zapisem uréitého znaku v jedné pozici je vy- 
loucen zapis nékterych znakd v jinych pozicich: 

~ je-li v pozici 1 znak D, nemize byt v pozici 2 znak E, 

~ je-li v pozici 2 znak E, nemize byt v pozici 4 znak 25 

Neprovede se zadna akce, 


__Chybny znak v_paranet klitoyého slova OPT; ignoravén 


Platné znaky jsou tyto: 

~v i. pozici mezera, D, U; 

~ v2. pozici mezera, D, K, E; 
-v 3. pozici mezera, C; 

~ ve 4. pozici mezera, 1, 3; 
~ v5. pozici mezera, D. 


1213 _Faranetr_v OPT je prilid dlouhj; na 


Prebytetné Znaky jsou ignorovany. 


_Kligové slovo MOD chybi; algorit 


Parametr kligového slova DISP udava relativni pozici pravého kontrolniho znaku pole se samakant- 
rolou. Tato pozice nesmi byt vétSi nez délka pole. Neprovede se Zddna akce. 


Priloha 5. Chybové zpravy prekladace DE/RPG 5-29 
PS-B8 DE/RPG - Popis jazyka 


jouzito cislo algoritmu samokontroly, ktery neni definovan. Bez definice algoritmu 


V programu je pt y bez | 
Nt i a jen cisla standardmich algoritmd 10 a il. Neprovede se Zadna akce. 


mohou byt pouzit: 


1218 _Definovano_V) 13 algoritmd; pfebytetné jsou_ignorovany 


Parametr klicového slova OPT je Fetézec az 5 znakd uzavreny v apostrofech, Neprovede se zadna akce. 


Prvni segment podprogrami zapsaneho v jazyku BAL musi byt segment instrukci. Vstupni bod musi od- 
povidat zavadecimu bodu (adrese zatatku podprogramu). 


2002__Chyba zarovnani_v_ segment 1 
Tato zprava se nlasi, jestiize adresa zadana v popisovati segmentu I nebo v bezprostfedné nasle- 
dujicim popisovaci nelezi na hramici 4 slabik (neni nasobkem 4). Vsechny strojove instrukce musi 


byt zarovnany na hranici 4 slabik. 


2003__Zatatetni_adresa_sequentu je ino 


Taéatecni adresy segment’ musi nasledovat ve vzestupnem poradi. Taéateéni adresa segmentu mize 
byt shodna se zaCatecni adresou predchoziho segmentu, ale nesmi byt mensi. 


sere premistitelnych adres se sklada z dvouslabicnych hodnot organizovanych napr. v tabulce adres 
(,LABTAB) . 


2007 __Zadano vice 


a pouzit (volat) az 16 rdznych podprogramd. V programu véak mize byt zapsdno vice nez 16 prikazi 
iL. 


P5-90 DE/RPG - Popis jazyka 


Doslo k chybé diskety pri Pripojovani vy, 


no a odpovidajici prikaz CALL se 


néjSiho 
Nebude provadét, 


Podprogramu: racovani tohoto Podprogramy 
programu; zp; ani toho! pr 
Ogramu je 


Priloha 5. Chybové zpravy prekladace DE/RPG 5-91 


ukonée~ 


PS-92 DE/RPG - Popis jazyka 


Tato stranka je prazdna umyslne 


[rmenenene, 
| Rejstix | 


ee | 


# 


4##ALTSEO titul tabulky pro zménu tridici sekvence 7-4 
HOTDATA titul prikompilované aatovée tabulky 7-1 

HFTRANS titul prekodovaci tabulky 7-2 

HSLFCHKxx titul specifikace algoritmu Samokontroly 7=43 


* 


+ADD rezim vstup-oridani v TFILE 4-7, 9-2 

4DBL dvé oblasti vstupu/vystupu 5-3 

#DMY den, mésic, rok v UDATE 4-2 

4ENTER rezim vstup v TFILE 4-7, 9-2 

4FHTS blokované navazujici Zaznamy 5-3 

#fNTU neblokované nenavazuyici zaznamy 5-3 

aMDY mesic, den, rok v UDATE 4-2 

‘NO potlaceni vymazu obrazovky 4-10 

4N0 potlaceni zépisu na transakéni soubor 4-11 
4NOUPEN potlaceni automaticxého otevirani soubord 4-4 
4NOPHT potlaceni oteviracich Napovedi 4-4 

4PASS pot laceni Volby produktnich statistik 4-10 
4#0Snnnn pozice znaku v zaznamu 4-9, 4-14, 3-6, 5-7, 5-10 
ARERUN rezim ofepoget v TFILE 4-7, 9-2 

aRTN abrazavkovy Podpragram mimo ramec Pole 5-14 
45TATnn stFdace statistik 3-2 

ASTATUS pouziti funkce konec prace v ramci EXFMT 4-4 
*0in standardni stiadage 2, 5 

WPOATE rezim zména v TFILE 

WERIFY rezim kontrola v TFILE 

4YMD rok, mesic, den y UDATE 


4 


AD automaticks Guplikace pole 5-2; 
ADD pFiéteni ke sthadaci 5-20, 6-8 
ALTSEQ tabulka oro zménu tfidici sekvence 7-4 
ARRATR zpisob zZPracovani tabulky 5-20 
ACI] standardni tabulka pro zménu tFidici sekvence do xodu KOI-8 
atributy Zobrazovaci 4-3, 4-4, 5-4, 5-10, 5-24 
Domocnd duplikace  5- 0 
AUST ponacné uloseni 5-20 


B 


H kontrola Mezer v poli 5-23 


' 2alatek Podprogramu 4-3 
ae Wonuti bitd 4-49 
TON zannut i bith 4-49 


Rejstrik R-i 


BL plikam 4-3, 4-4, 5-4, 
BLKING seskupeni 
BV mijeni pole 372 
BY mijeni pole 5-21 


znami = S-3 


ezeouseni = S-21 


C 
CA zrusem atrioutd 5-25 u 
CAB porovnani a oezpadminecny Skok Th 
6-14 


CABxx porovnani a podminény skok 
CALL vyvolani BAL-podprogramu ve vypoctech 
CFILE kepiravaci soubor 4-2 
CHAIN primé Eteni zaznanu 6-24 
CHECK kontrola <lavesoveno vstupu 
CLOSE uzavreni souboru 6-30 
CLRL vymaz radki 4-10 

COMM komuni<acni spoj 5-4 

COMP porovnani ve vypoctech 6-13 
COMP porovnani vstugnich dat s daty v programu 
CRT klavesnice/obrazovka 5-4 . 

(CS oddélovate pozic 4-3, 4-4, 5-4, 5-10, 5- 


6-6, il-t 


5-21, 5-3, 5-9 


bi) 


DATE tvar data v UDATE 4-2 

DD potlateni duplikace pole 5-21, 5-3, 5-9 
DELET zeuSeni zaznamu 2b 

DEVICE typ zarizeni 
DISK disketa 5-4 
DISF pozice kontroiniho znaxu pri samokontroie 7-14 
DiV déleni 6-9 

DR povinna data v poli 5-21 

DSPATR zobrazovaci atriouty poli 5-4, 5-10, 5-24 
DSPSIZ velikost obrazovky 5-4 


E 


EDITC ediéni znaky 4-3 

EDTCDE edicni kod v oorazovxovem formdtu 5-25 
ENDSR konec podprogramu 6-3 

ENTRATR atributy aktivnino pole 4-2 
EQJ konec prace 4-10 

EQJCTL modifikace ukonéeni diohy 4-3 

EQ rovno 5-23, 5-33 

ERROR zobrazeni chybavé zpravy 5-27 

EXFMT provedeni oorazavkovéno formatu 6-28 

EXITATR atribucy neaktivnich poli 4-4 

EXSR vyvolani podorogramu v ramci pole 5-2) 

EXSR vyvolani vnitfnino Podprogramu ve vypoctech 6-4 


R-2 DE/RPG - Popis jazyka 


5 


FE povinné opusténi pole 5-24 
FEOD vnuceni konce dat 6-34 
FORM délka strankovéha formulate 3-5 
format daléi 4-9 
format nula (format 0) 4-4, 9-5 
format obrazovkovy 1-1, 4-g 
format prohlizeci 1-1, 2-3, 2-5, 4-13 
format vstupni 1-1, 1-4, 2-3, 2-5, 4-8 
formulare programovaci 2-4 
funkce automaticka dup) ikace/skok 9-11, 5-24 
funkce automatické oznaceni 9-11 as 
funkce automaticky vstup 9-12 
funkce blok zpét 9-12 
funkce dalsi format 9-13 
funkce duplikace 9-13 
funkce hexadecimaini 9-44 
funkce hledani kance dat 9-14 
funkce hledani podle cisla Zaznamu 9-45 
funkce hledani podle Obsahu = 9-15 
funkce hledani set7idéného Obsahu 9-15 
funkce klavesové 1-2, 9-9, 9-10 
funkce konec price 9-14 
funkce korexce pole 9-14 
funkce korekce zéznamu 9-16 
funkce list krok 9-14 
funkce novy Fadek 9-17 
funkce nulovani 9-17 
funkce oznaceni pole 9-i7 
funkce pole krok 9-19 
funkce pole zpét 9-20 
funkce pole+ 9-18 
funkce pole- 9-18 
aa Beet editnich kontrol 9-20 
lunkce prohlizeni é 2 
funkce pFeskok ai See eae 
funkce presun Zaznamu 9-24 
funkce smazani Obrazovky 9-29 
funkce smazan{ vstupu 9-29 
funkce text 9-29 Es 
funkce tisk 9-23 
{unice Ukazatel dol} 9-23 
UnKCe Ukazate} Mahoru 9-23 
funkce “pozornéni 9-23 
funkce viogen; Zaznamu 9-23 
funkce Vlozeni znaky 9-24 
funkce vybar formitu 9-24 
funkee zm 9-25 fs 
funkce Znak krok 9-25 
{unkce znak 2p8t 9-25 


Introlovangno Zaznamu 9-2 


ag 2rugeni znaky 9-27 
WCE Zadost Systém 9-27 


Rejstiik R-3 


t } 


G 
GE vetsi nebo rovno 5-23, SS WRK chybova znatka 5-4 
generace kontralnich znakd = S-2i ME povinny vstup do pole 5 
GOTO skok 4-5 MF povinne zaplnéni pole 5-22 
GT vetsi nez 5-23, 5-33 "0D modu] samokontroly 7-14 
sodul v samokontrole 7-5 
modulo 7-5, 5-21 
NOVE presun k pravému okraji 6-15 
H NOVEA presun vektoru 6-17 
5 NOVEL presun k levému okraji 4-15 
| HI zvyéena intenzita 4-3, 4-4, 5-4, 5-10, 5-25 MULT nasobeni 4-9 
WR presun zbytku po déleni 4-10 
I 
| N 
INDEX indexovy soubor 5-5 of ey) Ee 
indikator podminkovy na sekundarnim radku 5-14, S-21, S-2 ND nezobrazovand data 4-3, 4-4, 5-4. 5- 
NEnerovno 5-23, 5-33 | 34, 5-10, 5-25 


\ indikator pro konec prace 4-4 
indikator pro konec stranky 5-5 
indikator pro typ zaznamu 5-10 
indikator pro vysledek porovnani pole 5-23 
indikatory 3-3 
indikatory podminkové 4-2 0 
| indikatory vysledkové 6-11, 6-14, 6-20, 6-21, 6-23, 6-25 az 6-31 
| indikatory - zapinani a vypinani 5-10, 5-33, 6-31 (FEN otevreni souboru 
| INSERT naplnéni pole z program 5-28 


NUMENT pocet zaznamd v souboru nedo polozek v tabulce 5-6 


e 30 
Oprava (zmena) dat 2, 9-5 
FT volby v samokontrole 7-14 


J 


Pp 
| jména 3-2 
| 10 ijeni i 4 ; 
BOPT modifikace zahajeni ulohy 4-4 Hid janetr pro CALL 6-7, li-1 
UST seznam par, ‘ ae . 
AMT ndgavid ee Pro CALL 6-7, {1-1 
‘ pole Ciselng 5-16 
Meauserné 5-16, 5-2, 5-9 
klévesy funkéni 949, 6-29 Ah Sie es 5-9 
es eien, ee es mole vistupni 5-16, 5-5 ae 
Retox le znakove 5-14 °° ord 
konstanty Ciseiné 3-3 Porizovani das ue 
konstanty znakové 3-3 RIM ae 1-2, 9-2 
kontrola (prezkougeni ~ Karna | 5-4 
prezkouSeni) dat 9-7 Mogran Syggep = : 
progran wkonny 424 Z€n1 Zdrojoveho progranu 2-4, 13-1 
me Zdrojovy 4-4 
SIFILE tiskayy r 
L tink ras neformatovy 4-5 
; ee 2 
LABEL jméno souboru na disket@ 5-6 iene Bal 1-2, 9-5 
Lc dol ni premyk v poli 5-22 ita seni (kontrola) dat 1-2, 9-7 
LE mensi nebo rovno 5-23, 5-33 wae Poznamkové 3-3 2, 
LOGON pFipajovaci informace v komunikaci 5-6 ian pipet’ {-2 
rOjove j-} 


LOKUP hiedani v tabulce 6-20 
LOOK kontrola tabulkou hodnot 5-29 
LT menSi nez 5-23, 5-33 


R-4 DE/RPG - Popis jazyka 


Rejstrik R-5 


R 


RANGE kontrola rozsanu 5-30 
RANGET kontrola tabulxou rozsand 5-31 ee 
RE zarovnanh noie vpravo S$ doplnenim nezer 22 
READ Cteni zaznamu b 
READP ctenl predcnazino 2a 
RECID identifixace zaznama 5-10 
RESET nulovani stradace 5-32 
trala (prezkouseni) 
9-8 
9-6 
9-8 
9-8 


znamu 6-23 


rezim kon 9-7 
rezim kontrola-hledant 
rezim kontrola-karekce 
rezim kontrola-vkiadant 
rezim kontroja-zobrazen? 
rezim kopirovani 9-2 

rezim Kopirovani-hledans 9-3 

rezin kopirovani-presun af bs 

rezim prepocet se zobrazenim 9-9 

rezim tisk 9-4 

rezim ystup 9-2 

rezim vypocet 78 

rezim zinena 9-5 

rezim zmena-hiedani 

rezim zmena-vkladant 

rezimy vygoctu heb, 9-2, 9-10 bE 
RI inverzai zabrazen! 4-3, 4-4, 5-4, 5-10, 5-25 
RL vkiadani dat do acle zorava doleva — 

RZ zarovnani pole voravo 5 dop)nenim nui 


Rr 


#adek stavovy na obrazovce 9-29 

fadky pokracovaci ei, Ai, 4-8, Sh 5-8, 
fadky primarni  S-t 

radky sekundarm’ = S-i, 4-8, 4-13, 5-13 
Fadky zdrojoveho program 3-1 


E} 


samokontrola 7-4, 5-21, §-22 

sekvence klavesové funkémi 

SEQ kontrola poradi 5-3 

SETLL nastaveni pozice v souboru 6-27 
SETOF vypnuti indikatoru 5-10, 5-33, 6-31 
SETON zapnuti indikatoru 5-10, 5-33, 6-31 
SFILE soubor statistik 4-5 

SHARE sdilené soubory 4-5 

SHARER soubory sdilené jen pri cteni 4-5 
SHIFT premyk pro jednotlive znaky 5-33 
SKIPA skok po tisku Sli 

SKIPB sxok ared tiskem S-li 


SLNO Eislo pocatecniho #adku obrazovky 4-11, 5-17, 5-43 


siova kKlicova 3-2, 5-19, 5-38, 5-39 

siova rezervovana 3-2 

soubor 5-1 

souar disketovy 5-, 6-22 az 6-27, 6-30, } 
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soudor indexovany is indexem) 5-1, 5-5 
soubor indexovy 5-5, 12-2 : 
soubor klicovany (s klicem) 12-2 


soubor Somunixatni 4-9, 5-4, 5-6, 6-22, 6-25, 4-30, &-31 
’ 


soubor xopirovaci 4-2, 6-30, 9-3 

soubor na klavesnici 5-i 
oe aaa a obrazovce § 5-i, 6-28, 6-25 
soubor statistix 4-2, 4-5, 6-; 1-32 
soubor tiskovy 4-2 4-5; eee en 
soubor transakéni 1-1, 4-6, 6-20, 9-2 9-3 
SPACEA posuv po tisku 5-11 pes 
SPACEB posuv pred tiskem 5-ii 

statistiky produkéni 1-2, 9-31 

STATUS stav zarizeni 4-4, 4-6, 6-22, 6-29 
stav "oCekavan vstup" 9-9 er 
stav "oCekavano opusténi pole" 9-9 
strategie programovaci 1-1 

SUBST nahrada vstupnich dat 5-34 


T 


uly datové 7-1, 5-40, 5-6 
tabulky pro zmenu tridici sek 
tabulky prekddovaci 7-2 ie 

tabulxy prikompilované 1 

wee Fl, 23, 2° B = 

TADD pricteni k #T0Tn =5. aii? 
TAG navesti 6-5 

TFILE transakéni soubor 4-6 

ealky prekddovaci 7-2 

isk formatovy rizeny 

i Programem  4-" 73 

tisk neformatavy 4-5, el Bee 

TSUB adecteni od #70Tn 5-35 

tvar dat binarni 5-15, 10-2 
ia Bat upraveny edicnim kodem 5-25 
tvar dat zhuStény dekadicky 5-15, 
nee dat znakovy 10-1 Y ae 
var dat zonovy dekadicky  10- 
typ dat 5-15 : 


U 


UDATE systémové datum 3-2 
UL podtrhnuti 4-3, 4-4, 5-4, 5-10, 5-25 
UPDAT Prepis zaznamu 4-26 
uziti pole 5-16, 5-2, 5-9 


v 


vaha Vv samokontrole 7-5 

vkladani (vstup) dat 1-2, 9-2 
VMARK znatka prezkouSeni 5-7 
vstup (vkladani) dat 1-2, 9-2 


Rejstrik R-7 


W 


WEIGHTS vahy pozic pri samokontrole 7-14 
WRITE zapis noveho zaznamu bcoeee 
WRITE zapis vy jiném tvaru na transakcni soubor 


aaw 
= 


RAS 


Xx 


> 2RBRA 


YCHK pFicnd kontrola dvojice poli 5-36 


Z 


T-ADD presun cisla 4-8 

7-SUB péesun Cisla se zménou znamenka 6-9 
zaznany blokované a navazujici 5-3, 12-1 
zaznany disketové 12-1 

zaznamy neblokované a nenavazujici 5-3, 12-1 
zmena (oprava) dat 1-2, 9-5 


ZAVT, KONCERN 
ZBROJOVKA BRNO 


KONCERNOVY PODNIK 


617 BRNO, LAZARETNI 7, CSSR 
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ZBROJOVKA BRNO 


koncernovy podnik 


